Помогите решить 3 задачу ПАСКАЛЬ

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

Помогите решить 3 задачу ПАСКАЛЬ


image

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

function myFunction(x: real):real;

begin

if (x>=-10) and (x

myFunction:=sqr(x)+4*x-7 else

if ((x<-10) and (x<>0)) or (x>=2) then

myFunction:=1/(sqr(x)+4*x-7);

end;

var x,y: real;

begin

write('Введите x: ');

readln(x);

y:=myFunction(x);

writeln('y = ',y);

end.

(552 баллов)