main = readLn >>= f
f 1 = print 1
f n | odd n = print n >> f (n*3+1)
f n = print n >> f (n `div` 2)