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

P. s Pascal ABC

Question

Препедигна

20 февраля, 01:51

+1

Ответы (1)

Знаете ответ на вопрос?

Измарагд · 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.

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