main = do
    _ <- getLine
    as <- (fmap read . words) <$> getLine
    putStrLn $ show $ sum $ map (countM2 0) as

countM2 ac n
    | n `mod` 2 == 0 = countM2 (ac+1) (n `div` 2) 
    | otherwise      = ac