Вычислить сумму 3/5+8/10+13/15+...+998/1000 в паскале

Question

Вычислить сумму 3/5+8/10+13/15+...+998/1000 в паскале

Comments

Троеточие это что?

---

Это много

Answer 1

Var i:integer; s:real;
begin
s:=0;
for i:=1 to 1000 div 5 do s:=s+(5*i-2)/(5*i);
writeln('s=',s);
end.

Результат:
s=197.648787620751

Comments

Слагаемых в ряде будет 200, сумма не может превосходить 200

---

var n: integer; s: real; begin s:=0; n:=1; repeat s:=s+(5*n-2)/(5*n); n:=n+1; until 5*n>1000; writeln('сумма: ',s); end.

---

сумма: 197.648787620751

---

Да, конечно.