Информатика 10 класс

var x,y:real;

begin

readln(x);

if x <=-1 then

y:=-1/sqr(x)

else if ((x>-1) and (x<=2)) then  y:=sqr(x)

else if x > 2 then y:=-4;

writeln(y);

end;

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку