Составить программу вычисления выражения y=sin(a+b/2) при a=15,b=30 P.s Pascal ABC

Question

Составить программу вычисления выражения y=sin(a+b/2) при a=15,b=30

P.s Pascal ABC

Answer 1

Uses Crt;
var

y,x:Real;

Const
a=15;
b=30;

Begin
ClrScr;
x:=(a+b/2)*(pi/180);

y:=sin(x);

Write(y);
End.