Дано натуральное число N и действительное число x. Вычислить сумму ряда:

sin x + sin 2x+sin 3x+ ... sin N*X

Протестировать программу для x=1.5 и N=3. Проверить правильность ответа на калькуляторе.

Question

Информатика

Кирсан

21 февраля, 02:44

Дано натуральное число N и действительное число x. Вычислить сумму ряда:

sin x + sin 2x+sin 3x+ ... sin N*X

Протестировать программу для x=1.5 и N=3. Проверить правильность ответа на калькуляторе.

+3

Ответы (1)

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

Федотия · Answer 1

var

n, i: integer;

x, s: real;

begin

repeat

writeln ('Введите количество слагаемых:') ;

readln (n)

until n>0;

writeln ('Введите ''x'':') ;

readln (x) ;

for i : = 1 to n do

s : = s + sin (i * x) ;

writeln (s) ;

readln

end.