Составить программу по условию.

Daniela080722 Daniela080722    2   21.04.2020 14:17    0

Ответы
elzarik08 elzarik08  28.08.2020 10:52

var x: integer;

begin

   readln(x);

   if x > 0 then x := x + 1

   else if x < 0 then x := x - 3

   else x := 17;

   writeln(x);

end.

PS: язык программирования pascal

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика