Даны действительное число a, натуральное число n. Вычис- лить:

[Petrovich83]

Даны действительное число a, натуральное число n. Вычис-
лить:1/a+1/a/(a+1)+1/a/(a+1)/(a+2)+1/a/(a+1)/(a+2)/(a+3)+...+1/a/(a+1)/.../(a+n)

[Mad_Cat]

d:=1;s:=0;
for i:=0 to n do begin
d:=d/(a+i);
s:=s+d;
end;