ОЧЕНЬ СРОЧНО НА ЗАВТРА Написать программу программа Вычислить значение функции F(x)={ln x+9/-x/x^2-7 еслиx>0 если x меньше либо равно 0
F(x) напишите ещё раз. Непонятно
F(x)= { lnx+9
{- x/x^2-7
дробь с минусом
Var x,f : real; begin write('x='); readln(x); if x>0 then f:=ln(x)+9 else f:=-x/(x*x-7); writeln('f(x) = ',f); end.