Задача для языка Free Pascal:

Вычислить значение суммы ряда Y (X) в произвольной точке х, если

Y (x) = sinx + sin^2 (x) + sin^3 (x) + ... + sin^n (x)

Величину х вводить

Выполнить вычисления для 5,10,15 и 20 слагаемых

Question

Информатика

Ляля

29 мая, 21:42

Задача для языка Free Pascal:

Вычислить значение суммы ряда Y (X) в произвольной точке х, если

Y (x) = sinx + sin^2 (x) + sin^3 (x) + ... + sin^n (x)

Величину х вводить

Выполнить вычисления для 5,10,15 и 20 слагаемых

+3

Ответы (1)

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

Кельтск · Answer 1

var x, y, p:real; n, i:integer;

begin

write ('x = ') ;

readln (x) ;

write ('n = ') ;

readln (n) ;

p:=1;

for i:=1 to n do

begin

p:=p*sin (x) ;

y:=y+p;

end;

writeln ('y = ', y:6:4) ;

end.

Пример:

x = 1.5

n = 5

y = 4.9626