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

Question

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

---

Answer 1

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

Comments

О,спасибо)