Предмет: Информатика, автор: misuiro

Ввести любое целое число А, если число соответствует условию
0
помогите, пожалуйста!


misuiro: Ввести любое целое число А, если число соответствует условию
0

Ответы

Автор ответа: Maks129129
0

Ответ:

Program p17;

var A:integer;

begin

readln (A);

if A=0 then A:=A+3

else if A<>0 then A:=0;

writeln (A);

end.

Объяснение:

Похожие вопросы
Предмет: Технология, автор: Myrlichok