Напишите программу, которая в зависимости от введенного возраста добавляет слова «год», «года» или «лет». Например, при вводе возраста 1, программа сообщает «1 год», при числе 2 – «2 года», при числе 125 – «125 лет».

при вводе "111" выводит "111 год"

Исправил.

спасибо

var age:integer;begin  readln(age);  if ((age mod 100 >= 10) and (age mod 100 <= 19)) then writeln(age, ' лет')  else if (age mod 10 = 1) then writeln(age, ' год')  else if ((age mod 10 >= 2) and (age mod 10 <= 4)) then writeln(age, ' года')  else writeln(age, ' лет');end.