(*  Make a continous fraction of 1/(1+x)  *)
(*  From the 'Mathematica core language' manual  *)

Clear(x);
Nest(Function(v, 1 / (1 + v)), x, 3)