import Data.Ratio
import Data.Ord
import Data.List
import Control.Monad

main = do
  n <- readLn :: IO Int
  ab <- replicateM n $ map read . words <$> getLine :: IO [[Int]]

  mapM_ putStrLn $ map (unwords . map show) . reverse $ sortBy (comparing (\[a,b] -> a%b)) ab