Y=10 sin (6x)+ 20 cos (12x)+20 sin (12x) программа в паскале! Помогите решить пожалуйста

Question

Y=10 sin (6x)+ 20 cos (12x)+20 sin (12x) программа в паскале! Помогите решить пожалуйста

Answer 1

Var
X:real;
Begin
Write('X = ');Read(X);
Write('Y = ',10*Sin(6*X)+20*Cos(12*X)+20*Sin(12*X));
End.