Дано натуральное числоY.Увеличит его на 18, если число двухзначное. по Паскалю решить задачу
Дано натуральное числоY.Увеличит его на 18, если число двухзначное.
по Паскалю решить задачу
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
var a:integer;
begin
writeln('Введите число');
read(a);
if Length(inttostr(a))=2 then a:=a+18;
writeln(a);
end.
Не нашли ответ?
Похожие вопросы