Написать программу вычисления суммы: sin x + sin - вопрос №235674959 от YungTrappa1 14.02.2022 05:15

Question

Информатика: Написать программу вычисления суммы: sin x + sin 2x + sin 3x + + sin nx

YungTrappa1 · Answer

// PascalABC.NET 3.1, сборка 1239 от 08.05.2016
begin
var x:=ReadReal('x=');
var s:=0.0;
for var i:=1 to ReadInteger('n=') do s+=sin(i*x);
Writeln('s=',s)
end.

Тестовое решение
x= 0.543
n= 15
s=2.79048740821036