var a, b: integer; c: real;
begin
  readln(b);
  c := 0;
  for a := 1 to b do
    c := c + 1.0 / a;
  writeln(c:0:4);
end.