import Data.List
main::IO()
main = do
  getLine
  xs<-fmap (fmap read . words) getLine
  let exe xs
       |odd (length xs) = head . drop centerId . sort $ xs
       |otherwise =(/2) . sum . take 2 . drop (centerId -1). sort $ xs
       where centerId =length xs `div` 2
  print . exe $ xs