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

Question

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

Comments

Не знаю имеется ли в виду написание программы на каком-либо языке, но по крайней мере вот такой однострочник на хаскелле: s = sum [ cos x | x <- [1..10] ] утверждает, что результат будет s = -1.417447746455906. Посмотрим что скажут другие решатели.

Answer 1

Скорее всего, в задании требуется написать программу. На паскале это будет так:
var s:real; i:integer;
begin
s:=0;
for i:=1 to 10 do s:=s+cos(i);
writeln('s = ',s);
end.