Question

даны x,y,z найти b если
b = 1+cos(y-2)/x4/2+ sin^2 7 (паскаль)

Answer 1

var b,x,y,z:real;
begin write('x->');
readln(x);
write('z->');
readln(y);
write('z->');
readln(z);
b:=0;
b:=1+cos(y-2)/x*4/2+ sin^2 7;
writeln('b=',b:4:2);
readln;
end.