Question

нужно решение этого уравнения в паскале, Срочно пожалуйста Помогите

Answer 1

Ответ:

Pascal

uses math;

var

 x, y, z, s : double;

begin

 x:=0.1722;

 y:=6.33;

 z:=3.25 * power(10,-4);

 s:= 5*arctan(x) - 0.25*arccos(x)*(x+3*abs(x-y)+sqr(x))/(abs(x-y)*z+sqr(x));

 writeln('s=',s:3:3);

end.