помогите написать на Паскале
Дано натуральное число Y. Увеличить его на 18, если число двухзначное.
входные данные 23
выходные данные 41
Ответы на вопрос
Ответил BobbyFresnel
1
===== PascalABC.NET =====
begin
var Y := ReadInteger('Y =');
if Y in Range(10, 99) then
Println(Y + 18)
end.
Приложения:
mrcotek:
ясно.. )
а нам сказали в колледже что это паскаль
то есть просить сделать на free pascal?
ок, спасибо!
Новые вопросы