ПАСКАЛЬ.правильно ли я составила? 1 фото- задание

Question

ПАСКАЛЬ.правильно ли я составила?
1 фото- задание

---

---

Answer 1

Var x,a,s:real; i:integer;
begin
x:=0.5;
s:=0;
for i:=1 to 10 do
 begin
 a:=cos(2*i)/((2*i-1)*(2*i+1));
 s:=s+a;
 end;
writeln('s = ',s);
end.

Результат:
s = -0.15972955915057