Question

Дано натуральное число n. Вычислить сумму: 1/2+2/3+3/4+…+n/(n+1).

Answer 1

Ответ:

Объяснение:

var S : real;

var i, n : integer;

BEGIN

write ('Vvedite n');

readln (n);

S := 0;

for i:=1 to n

S := S + i/(i+1);

writeln ('S := ', S);

END.