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

1

Ответы и объяснения

2013-04-26T21:00:26+04:00

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.