var n,i: integer; s: real; begin write('vvedite n='); read(n); s:=1; for i:=1 to n do s:=1+1/(1+i); writeln(s); readln; end.