Информатика 10 класс
var x,y:real;
begin
readln(x);
if x <=-1 then</p>
y:=-1/sqr(x)
else if ((x>-1) and (x<=2)) then y:=sqr(x)</p>
else if x > 2 then y:=-4;
writeln(y);
end;