quicksort :: (Ord a) => [a] -> [a]
quicksort [] = []
quicksort (x:xs) = let smallList = [a | a <- xs, a < x]
                       largeList = [a | a <- xs, a >= x]
                   in quicksort smallList ++ [x] ++ quicksort largeList

stringToInt :: String -> Int
stringToInt = read

main = do
    line <- getLine
    let [a, b, c] = quicksort . map stringToInt $ words line
    putStrLn $ show a ++ " " ++ show b ++ " " ++ show c
    

