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

// PascalABC.NET 3.1, сборка 1239 от 08.05.2016begin  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.543n= 15s=2.79048740821036