import Control.Applicative

countDivision :: Integer -> [Integer] -> Integer
countDivision count a
  | all even a = countDivision (count+1) (map (\n -> n `quot` 2) a)
  | otherwise = count

main :: IO ()
main = do
  getLine
  a <- (map read . words) <$> getLine
  putStrLn $ show $ countDivision 0 a
