программирование как сделать 1
Приложения:
Ответы на вопрос
Ответил HRAshton
0
var yo: integer;
begin
readln(yo);
writeln(yo, (yo mod 10 = 0) or (yo mod 10 >= 5) ? ' лет' : (yo mod 10 = 1 ? ' год' : ' года'));
end.
Не бойтесь тернаров
begin
readln(yo);
writeln(yo, (yo mod 10 = 0) or (yo mod 10 >= 5) ? ' лет' : (yo mod 10 = 1 ? ' год' : ' года'));
end.
Не бойтесь тернаров
Ответил Razikov
0
спасибо
Ответил Razikov
0
почему пишет ошибку
Ответил HRAshton
0
В каком месте?
Ответил Razikov
0
перед первым вопросом
Ответил HRAshton
0
Скачайте новый PascalABC.NET с одноимённого сайта
Новые вопросы