Нужно написать программу в паскале. : введите возраст человека от 1 до 150 и выведите его вместе со словом "год","года",лет".

217

441

Посмотреть ответы 2

Ответы на вопрос:

nastya01241

Информатика

4,7(26 оценок)

vara: byte; beginreadln(a); if ((a< 11) or ((a> 14) and (a< 110)) or (a> 114)) and (a mod 10< 5) and (a mod 10> 1) thenwriteln(a,' года') elseif (a mod 10=1) and (a< > 11) and (a< > 111) thenwriteln(a,' год') elsewriteln(a,' лет'); readln; end.