var
x,Y,A,B,C,D,E,F :real;
begin
x:=3.33;
A:=Sin(Pi-x);
B:=Cos(Pi-x);
C:=Cos(x)*A;
D:=Power(4.8+Exp(Cos(x)+A),1/4);
E:=Sin(x)*B;
F:=Power(1.1+Exp(Sin(x)+B),1/4);
Y:=C/D+E/F;
write(Y);
end.
Результат, выведенный программой:
-0.0139895012127416
var
x,Y,A,B,C,D,E,F :real;
begin
x:=3.33;
A:=Sin(Pi-x);
B:=Cos(Pi-x);
C:=Cos(x)*A;
D:=Power(4.8+Exp(Cos(x)+A),1/4);
E:=Sin(x)*B;
F:=Power(1.1+Exp(Sin(x)+B),1/4);
Y:=C/D+E/F;
write(Y);
end.
Результат, выведенный программой:
-0.0139895012127416