main :: IO () main = do n <- read `fmap` getLine print $ ceiling $ logBase 2 n