Ввычислить сумму ряда S:=cos1+cos2+cos3+...+cos10

Question

Ввычислить сумму ряда S:=cos1+cos2+cos3+...+cos10

Answer 1

// PascalABC.NET 3.2, сборка 1381 от 04.02.2017
// Внимание! Если программа не работает, обновите версию!

begin
  Writeln(Range(1,10).Aggregate(0.0,(x,y)->x+cos(y)))
end.

Результат
-1.41744774645591