Найти сумму членов последовательности 6/5,8/7,10/9,12/11…152/151 в паскале

Вопрос школьника по предмету Информатика

Найти сумму членов последовательности 6/5,8/7,10/9,12/11…152/151 в паскале

Ответ учителя по предмету Информатика

var i: integer;

    s: real;

begin

  i:=6;  s:=0;

  repeat

    s:=s+i/(i-1);

    i:=i+2;

  until i>152;

  writeln(‘сумма: ‘,s:6:3);

end.

сумма: 75.814