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

Question

87

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

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

delfy · Accepted Answer

78

delfy

16 апреля 2023

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.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: