Написать программу вычисления суммы: sin x + sin - вопрос №567563623 от Tyshkanchik228 22.03.2022 19:53

Question

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

Tyshkanchik228 · 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