Дано число y при вводе с клавиатуры числа x должно вывести ему равен y, если
y=1, если х≥1. y=0 если -1<x<1 y=-1 если x<0 ЗАдача паскаль
y=1, если х≥1. y=0 если -1<x<1 y=-1 если x<0 ЗАдача паскаль
More Questions From This User See All
Answers & Comments
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