import Control.Applicative
import Control.Monad
import Data.List
import qualified Data.Map as M
import Text.Printf

readInts :: IO [Int]
readInts = map read . words <$> getLine

main :: IO ()
main = do
  getLine
  xs <- readInts
  putStrLn $ unwords $ map show $ solve xs

solve :: [Int] -> [Int]
solve = reverse

