import Control.Applicative
import Data.List

main :: IO ()
main = getLine >> solve <$> f >>= putStrLn
  where
    f = map read <$> words <$> getLine

solve :: [Int] -> String
solve xs = intercalate ":" . map (show . (flip div d)) $ xs
  where
    d = foldl1 gcd xs