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

0 голосов
21 просмотров

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


image

Информатика (50 баллов) | 21 просмотров
Дан 1 ответ
0 голосов

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;

(1.6k баллов)