Pascal. Определить значение Y при заданном вещественном значении X.

Question

Pascal. Определить значение Y при заданном вещественном значении X.

---

Answer 1

Var x,y:real;
begin
read(x);
if x < -1 then y = -x;
if (x >= -1)and(x <=1) then y = 1;<br>if x > 1 then y = x;
end.