Составить программу на паскале по функции
Var x:integer;
y:real;
begin
read (x);
If x
If (x=-6) or (x
If (x>1) or (x=1) then y:=x+2;
write (y:3:2);
end.
Выходные данные увидеть - было бы хорошо
Узнать*