
main :: IO ()
main = do
    n <- read <$> getLine
    as <- words <$> getLine
    let (xs, ys) = split as
    print $ unwords $
        if odd n then reverse xs ++ ys
                 else reverse ys ++ xs

split :: [a] -> ([a], [a])
split [] = ([], [])
split [x] = ([x], [])
split (x:y:zs) = let (xs, ys) = split zs
                 in  (x:xs, y:ys)
