Предмет: Информатика,
автор: LoniYes
Написать программу вычисления суммы:
Sin x + Sin 2x + Sin 3x + ... + Sin nx
Ответы
Автор ответа:
0
// 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
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
Похожие вопросы
Предмет: Английский язык,
автор: kto827749
Предмет: История,
автор: Ytkakyrnyl
Предмет: Қазақ тiлi,
автор: donskihdavid26
Предмет: Математика,
автор: vshtreker1
Предмет: География,
автор: msdrobyazgina