Дано натуральное число n (1n1188), определяющее возраст человека (в месяцах). Выразить возраст в годах и месяцах. Например, 21 год 10 месяцев, 52 года 1 месяц, 46 лет равно и т.д.

Program saidim;uses crt;var m:integer;begin  writeln('******************************');  writeln('**   Переводилка возраста   **');  writeln('******************************');  writeln();  writeln('Введите возраст в месяцах');  readln(m);  writeln('*** alphaues is thinking... ***');  writeln(); // writeln('Возраст равен ',m div 12,' лет ',m mod 12,' месяцев');  write('Возраст равен ',m div 12);  case ((m div 12) mod 10) of    1:  write(' год ');    2,3,4:  write(' годa ');    else   write(' лет ');  end;  case (m mod 12) of    0:  writeln(' ровно ');    1:  writeln(m mod 12,' месяц ');    2,3,4:  writeln(m mod 12,' месяцa ');    else   writeln(m mod 12,' месяцев ');  end;end.