В Паскале Вычислить сумму ряда из N чисел: S=2/3+3/4+4/5+5/6+…

program sum;

var

 S : real := 0;

 n : integer;

Begin

 write('введите число элементов n = ');

 readln(n);

 for var i := 1 to n do begin

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

 end;

 writeln('S = ', S);

end.

Объяснение:

протестированно в PascalABC.NET