Question

НАПИСАТЬ ПРОГРАММУ В ПАСКАЛЕ ДЛЯ ВЫЧЕСЛЕНИЯ ЭТОГО ДРОБНОГО УРАВНЕНИЕ

y=

Answer 1

var y,x:real;

z:real;

begin

read(x,z,y);

y=(sqr(x)-sqrt(1+x))/(sqr(z)*z-y);

writeln(y);

end.