помогите написать на Паскале
Дано натуральное число Y. Увеличить его на 18, если число двухзначное.
входные данные 23
выходные данные 41
Дано натуральное число Y. Увеличить его на 18, если число двухзначное.
входные данные 23
выходные данные 41
More Questions From This User See All
Answers & Comments
===== PascalABC.NET =====
begin
var Y := ReadInteger('Y =');
if Y in Range(10, 99) then
Println(Y + 18)
end.