Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.
Новые вопросы по предмету Информатика:
Var yo: integer;
begin
readln(yo);
writeln(yo, (yo mod 10 = 0) or (yo mod 10 >= 5) ? ' лет' : (yo mod 10 = 1 ? ' год' : ' года'));
end.
Не бойтесь тернаров