Question

Помогите написать программу в Pascal

Answer 1

Ответ:

var y,a,b,w: real;

begin

 a:=32;

 b:=-0.61252;

 w:=((pi/74)*24);

 begin

 y:=(power(a,3/5)*(tan(w)+sqrt(a)))/(sin(2*w));

 end;

 writeln(y);

end.

gl =)