напишите программы вычисления сумм ста слагаемых,имеющих вид дроби (i+1)/(i+2) (тема цикл)

Program Sum100;

Var i:integer;S:real;

begin

S:=0;

For i:=1 to 100 do S:=S+(i+1)/(i-1);

writeln(S);

end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку