-- Question C

import Control.Applicative
import Control.Monad

main = do
  n <- readLn ::IO Int
  zs <- (map read . words) <$> getLine 
  putStr $ unwords ( map show ( try' n zs) )
  
try' n zs = if n `mod` 2 == 0
                then (reverse (try1 1 n [] zs)) ++ try2 2 n [] zs
                else (reverse (try2 2 n [] zs)) ++ try1 1 n [] zs				

try1 :: Int -> Int -> [Int] -> [Int] -> [Int]
try1 i k ys xs  
  | i > k = ys 
  | otherwise = try1 (i+2) k ( ys ++ [xs !! (i-1)] ) xs
  
try2 :: Int -> Int -> [Int] -> [Int] -> [Int]
try2 i k ys xs  
  | i > k = ys 
  | otherwise = try2 (i+2) k ( ys ++ [xs !! (i-1)] ) xs