С клавиатуры вводится два целых числа, обозначающих возраст человека и его пол (1 – мужской, 2 –женский). Составить программу, которая в зависимости от введенных данных определяет принадлежность человека к определенной группе: от 0 до 13 – мальчик (девочка); от 14 до 20 – юноша (девушка); от 21 до 70 – мужчина (женщина); более 70 – старец (старушка).

// PascalABC.NET 3.2, сборка 1381 от 04.02.2017// Внимание! Если программа не работает, обновите версию!begin  var age:=ReadInteger('Введите возраст:');  var gender:=ReadInteger('Введите пол (1-М, 2-Ж):');  if gender=1 then    case age of    0..13:Writeln('Мальчик');    14..20:Writeln('Юноша');    21..70:Writeln('Мужчина');    else Writeln('Старец')    end  else    case age of    0..13:Writeln('Девочка');    14..20:Writeln('Девушка');    21..70:Writeln('Женщина');    else Writeln('Старушка')    endend.