Question

Информатика паскаль. Решите

Answer 1

var y,x,z: real;

begin

readln(x,y);

z:=ln(abs((y-sqrt(abs(x)))*(x-y/(x+x*x/4))));

write(z);

end.