import Data.List
median :: [Integer] -> Integer
median xs | mod l 2 == 0 = (xs!!(div l 2) + xs!!((div l 2)-1))`div`2
		  | otherwise    = xs!!(div l 2)
		where l = length xs

main = do
	getLine
	getLine >>= print . median . sort . map read . words