import Data.List

main = do
  getLine
  li <- getLine
  let ns = sort $ map read $ words li
  print $ compute ns

compute ns
  | odd (length ns) = ns !! (l2+1)
  | True = (ns !! l2 + ns !! (l2+1)) / 2
  
  where l2 = div (length ns) 2