f[x_]:=N[(2+x)/(1+x)]

HowLong=10;
Initialx=1;
For[x=Initialx; n=1, n<HowLong, n++; x=f[x], Print[x]]