main :: IO ()
main = putStrLn . show . ceiling . (logBase 2) . read =<< getLine