ClearAll;
$DefaultFont = {"Times-Roman",10};
phi[1] = 1; phi[n_]:= Simplify[1 + x/phi[n-1]];
Do[Print[phi[n]],{n,1,10}]