Sum[(99/100)^r/(1 + (99/100)^r), {r, 1, Infinity}]/100