Question

ОЧЕНЬ СРОЧНО НА ЗАВТРА

Написать программу
программа Вычислить значение функции F(x)={ln x+9/-x/x^2-7 еслиx>0 если x меньше либо равно 0

Answer 1

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.