Дано целое число. Написать программу, которая заменяет его на 0, если число отрицательное, и выводит его без изменений, в противном случае.
Дано целое число. Написать программу, которая заменяет его на 0, если число отрицательное, и выводит его без изменений, в противном случае.
Гость
Ответ(ы) на вопрос:
ГостьВот такая программа (для PascalABC.NET). И еще ты не сказал, что делать с числом, если оно равно 0?
var a,x:integer;
begin
read(a);
if a<0 then x:=0 else x:=a;
writeln(x);
end.
Не забудь откомпилировать перед проверкой.
Не нашли ответ?
Похожие вопросы