Переведите на язык pascal : 7(sin^2)*X-(1/2)*cosX

Переведите на язык pascal : 7(sin^2)*X-(1/2)*cosX
Гость
Ответ(ы) на вопрос:
Гость
var x,y:real; begin readln(x); y:=7*sin(x)*sin(x)-0.5*cos(x); writeln(y); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы