program calculation;varx, y, z, G, H: real;beginx := 2.367;y := -1.057;z := 3.025;
G := (2sin(x-2pi/3))/(1/2+cos(y)*cos(y));H := 1 + (power(z,5)/3 + power(z,5)/5);
writeln('G = ', G);writeln('H = ', H);end.
program calculation;
var
x, y, z, G, H: real;
begin
x := 2.367;
y := -1.057;
z := 3.025;
G := (2sin(x-2pi/3))/(1/2+cos(y)*cos(y));
H := 1 + (power(z,5)/3 + power(z,5)/5);
writeln('G = ', G);
writeln('H = ', H);
end.