Дано целое число. написать программу, которая заменяет - вопрос №30421210 от vladavlada60 20.07.2021 06:59

Question

Информатика: Дано целое число. написать программу, которая заменяет его на 0, если число отрицательное, и выводит его без изменений, в противном случае.

vladavlada60 · Answer

Вот такая программа (для PascalABC.NET). И еще ты не сказал, что делать с числом, если оно равно 0?

var a,x:integer;
begin
read(a);
if a<0 then x:=0 else x:=a;
writeln(x);
end.

Не забудь откомпилировать перед проверкой.