#!/usr/bin/env gosh

(define (med v)
  (inexact (vector-find-median < v 0))
  )

(define (str->vec str)
  (list->vector
   (map (^x (string->number x))
	(string-split str " ")))
  )

(define (main _)
  (let* ([_ (read-line)]
	 [str (read-line)])
    (display (med (str->vec str)))
    )
  (newline)
  0)