Нужно решить функцию в Паскале. Program Var begin writeln readln Z:=.... (нужная формула функц

Question

Нужно решить функцию в Паскале. Program Var begin writeln readln Z:=.... (нужная формула функции) writeln end.

Гость

Ответ(ы) на вопрос:

Accepted Answer

Var z,x:real; begin readln(x); z:=abs(x-sqr(1))-((7*x)/(sqr(x)-15*x)); write(z); end.