Помогите плиз!!!!
Дано целое число n (1 ≤ n ≤ 99), определяющее возраст человека (в годах). Для этого числа напечатать фразу «мне n лет», учитывая при этом, что при некоторых значениях n слово «лет» надо заменить на слово «год» или «года».
завтра пробный ГИА, помогите плиииз!!!

1

Ответы и объяснения

Лучший Ответ!
2014-03-11T21:26:03+04:00
Var
n:integer;
begin
readln(n);
if (n mod 10>=5)or(n mod 10=0) then
writeln('мне ',n,'  лет');
if n mod 10=1 then 
writeln('мне ',n,'  год');
if (n mod 10>1)and(n mod 10<5) then 
writeln('мне ',n,'  года');
end.