let rec calc k n =
    if n = 1 then Printf.printf "%d\n" k else
    if n mod 2 = 0 then calc (k + 1) (n / 2)
                   else calc (k + 1) (n + 1)
in
Scanf.scanf "%d" @@ calc 0