Помогите!!
Напечатайте фразу "Мне n лет", согласовав число n (n<=99) с фразой. Например, мне 15 лет или мне 4 года или мне 21 год.
Паскаль

program vozrast;var n: integer;beginwriteln ('Введите возраст');readln (n);if (n=1) or (n mod 10 = 1) then writeln ('Мне ',n,' год')else if (n>1) and (n<5) or (n mod 10 = 2) or (n mod 10 = 3) or (n mod 10 = 4) then writeln ('Мне ',n,' года')else writeln ('Мне ',n, ' лет');end.