Question

Паскаль. Вычислить значение выражения для вводимого значения Х

Answer 1

Ответ:

var

 X, Y: Double;

begin

 Write('Input X:');

 Readln(X);

 Y:= Sin(exp(X*LN(3)))/Cos(exp(X*LN(3))) + Sqr(2*exp(X*LN(3))) -  Cos(2*X) / (5*exp(X*LN(2)));

 Write('Y = ');

 Writeln(FloatToStr(Y));

end.

Объяснение:

Подключить математический модуль Math;

tg(X) = sin(X) / cos(X)

X  в степени n = exp(X*LN(n))