составьте программу вычисления суммы 2/3+3/4+4/5+...+10/11 с использованием оператора while

var i:integer; s:real;begini:=1; s:=0;while i<10 do begin i:=i+1; s:=s+i/(i+1); end;writeln('s = ',s:6:4);end.Результат:s = 7.4801