import Data.List

main = do
  n <- readLn :: IO Int
  as <- map read . words <$> getLine :: IO [Integer]
  let x = foldl1 gcd as
  putStrLn $ concat . intersperse ":" . map (show . (`div` x)) $ as