Подскажите как решается это задание в Delphi (именно в делфи).

Question

В общем у меня такое задание, S=3/4+5/6+7/8...n /n+1 (у меня возникает проблема в циклах, напишите полностью задание пожалуйста) . За лето позабыл все...

Nik Kl · Accepted Answer

var i,n:integer; 
 D,S:real; 
i:=3 
repeat 
D:=i/(i+1); 
S:=S+D; 
i:=i+2 
until i<>n; или unitl i=n точно не помню как оно работает

Алёна Байлова · Answer

[ссылка заблокирована по решению администрации проекта]

Ivan Kirichek · Answer

var i,n:integer; 
s:float; 
begin 
readln(n); 
s:=0; 
for i:=1 to n do 
s:=s+float(i)/(i+1); 
writeln(s); 
end.