let k = stdin.ReadLine() |> double let mutable ans = 0.0 let mutable tmp = 1.0 let mutable n = 1.0 while (tmp > 1e-16) do tmp <- 1.0 / (n * (n + k)) ans <- ans + tmp n <- n + 1.0 ans |> printfn "%A"