СРОЧНО,РЕШИТЕ НОМЕР 9 ПЛИЗ(ПАСКАЛЬ 7 КЛАСС)

Question

СРОЧНО,РЕШИТЕ НОМЕР 9 ПЛИЗ(ПАСКАЛЬ 7 КЛАСС)

---

Answer 1

Var
i,a,b:integer;
s:real;
begin
s:=117;
a:=4;
b:=1;
for i:=1 to 24 do
begin 
if i mod 2 = 0 then s:=s-(a/(b+b+2)) else s:=s+(a/(b+b+2));
 a:=a+2;
 b:=b+2;
end;
Writeln(s);
end.