Question

Создать программу вычисления указанной величины. Результат проверить при заданных исходных значениях.Pascal ABC

Answer 1

Var x,y,z,c:real;
begin
readln(x,y,z);
c:=exp(ln(2)*exp(ln(y)*x))+exp(ln(exp(ln(3)*x))*y);
c:=c-y*(arctan(z)-pi/6)/(abs(x)+1/(y*y+1));
writeln(c:8:6);
end.

Пример:3.251 0.325 0.466e-4
4.251433