Дано число y при вводе с клавиатуры числа x должно вывести ему равен y, если

y=1, если х≥1. y=0 если - 1

+5

Question

Информатика

Лизуша

31 мая, 16:20

Дано число y при вводе с клавиатуры числа x должно вывести ему равен y, если

y=1, если х≥1. y=0 если - 1

+5

Ответы (1)

Знаете ответ?

Дуняха · Answer 1

Var

y, x : integer;

begin

readln (x) ;

if x > = 1 then

y : = 1

else if (x > - 1) and (x < 1) then

y : = 0

else if x < 0 then

y : = - 1;

writeln (y) ;

end

Дано число y при вводе с клавиатуры числа x должно вывести ему равен y, еслиy=1, если х≥1. y=0 если - 1 +5

Дано число y при вводе с клавиатуры числа x должно вывести ему равен y, если

y=1, если х≥1. y=0 если - 1

+5