Программа, считающая значение этого выражения:
program Project1;
var x, a, b, f:double;
begin
writeln('Enter x: ');
readln(x);
writeln('Enter a: ');
readln(a);
writeln('Enter b: ');
readln(b);
f:=2*cos(x-pi/3)/exp(ln(a+(sin(b)* sin(b)))/x);
writeln(f);
readln;
end.
Где выражение f:=2*cos(x-pi/3)/exp(ln(a+(sin(b)* sin(b)))/x); является исходным выражением, записанным на паскале
