вычислить функцию в паскаль: F= (|3x|)^2-x^2/x-1

Question

вычислить функцию в паскаль: F= (|3x|)^2-x^2/x-1

Answer 1

function F(x:real):real;
begin
F:=9*sqr(x)-(sqr(x))/(x-1);
end;

 

{var x:real;
begin
readln(x);
writeln(F(x));
end.}