#[allow(unused_imports)]
use std::char::from_digit;
#[allow(unused_imports)]
use std::cmp::{max, min};
#[allow(unused_imports)]
use std::collections::{BTreeMap, BTreeSet, BinaryHeap, HashMap, HashSet, VecDeque};
#[allow(unused_imports)]
use std::fs::File;
#[allow(unused_imports)]
use std::io::prelude::*;
#[allow(unused_imports)]
use std::io::{stdin, stdout, BufReader, BufWriter, Stdin, Stdout, Write};
#[allow(unused_imports)]
use std::mem::swap;
#[allow(unused_imports)]
use std::str::FromStr;

type BoxResult<T> = Result<T, Box<std::error::Error>>;


fn main() {
    let mut scanner = Scanner::new(stdin());
    let n = scanner.read::<usize>().unwrap();
    let arr = scanner.read_vector::<usize>().unwrap();
    let (mut l, mut r) = (1, 1_000_000_000);
    let boundary = ((n * (n + 1)) / 2 + 1) / 2;
    if calc(r, &arr) >= boundary {
        println!("{}", r);
        return;
    }
    while r - l > 1 {
        let mid = (l + r) / 2;
        if calc(mid, &arr) >= boundary {
            l = mid;
        } else {
            r = mid;
        }
    }
    println!("{}", l);
}

fn calc(x: usize, arr: &[usize]) -> usize {
    let converted = arr.iter().map(|val| if *val >= x { 1 } else { -1 } ).collect::<Vec<_>>();
    let mut cumsum = vec![0; arr.len() + 1];
    for i in 0..converted.len() {
        cumsum[i + 1] = cumsum[i] + converted[i];
    }
    let values = cumsum.iter().cloned().collect::<BTreeSet<_>>();
    let converter = values.into_iter().enumerate().map(|(i, val)| (val, i + 1)).collect::<HashMap<_, _>>();
    let mut bit = BinaryIndexedTree::new(converter.len());
    let mut count = 0;
    for val in cumsum.iter() {
        count += bit.query(converter[val]);
        bit.add(converter[val], 1);
    }
    count
}

struct BinaryIndexedTree {
    len: usize,
    values: Vec<usize>,
}

impl BinaryIndexedTree {
    fn new(len: usize) -> BinaryIndexedTree {
        BinaryIndexedTree{ len: len, values: vec![0; len + 1] }
    }
    fn add(&mut self, mut x: usize, val: usize) {
        assert!(x > 0);
        while x <= self.len {
            self.values[x] += val;
            x += x & ((!x) + 1);
        }
    }
    fn query(&self, mut x: usize) -> usize {
        assert!(x > 0);
        let mut sum = 0;
        while x > 0 {
            sum += self.values[x];
            x -= x & ((!x) + 1);
        }
        sum
    }
}

#[allow(dead_code)]
struct Scanner<R> {
    reader: BufReader<R>,
    buffer: String,
}
impl<R> Scanner<R>
where
    R: Read,
{
    #[allow(dead_code)]
    fn new(inner: R) -> Scanner<R> {
        let reader = BufReader::new(inner);
        let buffer = String::new();
        Scanner {
            reader: reader,
            buffer: buffer,
        }
    }
    #[allow(dead_code)]
    fn with_capacity(capacity: usize, inner: R) -> Scanner<R> {
        let reader = BufReader::with_capacity(capacity, inner);
        let buffer = String::new();
        Scanner {
            reader: reader,
            buffer: buffer,
        }
    }

    #[allow(dead_code)]
    fn read_line(&mut self) -> BoxResult<String> {
        self.reader.read_line(&mut self.buffer)?;
        let cloned = self.buffer.trim().to_string();
        self.buffer.clear();
        Ok(cloned)
    }

    #[allow(dead_code)]
    fn read<T>(&mut self) -> BoxResult<T>
    where
        T: FromStr,
        T::Err: std::fmt::Debug,
        T::Err: std::error::Error,
        T::Err: 'static,
    {
        self.reader.read_line(&mut self.buffer)?;
        let parsed = self.buffer.trim().parse()?;
        self.buffer.clear();
        Ok(parsed)
    }
    #[allow(dead_code)]
    fn read_vector<T>(&mut self) -> BoxResult<Vec<T>>
    where
        T: FromStr,
        T::Err: std::fmt::Debug,
        T::Err: std::error::Error,
        T::Err: 'static,
    {
        self.reader.read_line(&mut self.buffer)?;
        let parsed_vec = self
            .buffer
            .trim()
            .split_whitespace()
            .map(|s| s.parse())
            .collect::<Result<Vec<_>, _>>()?;
        self.buffer.clear();
        Ok(parsed_vec)
    }
    #[allow(dead_code)]
    fn read_matrix<T>(&mut self, lines: usize) -> BoxResult<Vec<Vec<T>>>
    where
        T: FromStr,
        T::Err: std::fmt::Debug,
        T::Err: std::error::Error,
        T::Err: 'static,
    {
        let mut parsed_matrix = vec![];
        for _ in 0..lines {
            self.reader.read_line(&mut self.buffer)?;
            parsed_matrix.push(
                self.buffer
                    .trim()
                    .split_whitespace()
                    .map(|s| s.parse())
                    .collect::<Result<Vec<_>, _>>()?,
            );
            self.buffer.clear();
        }
        Ok(parsed_matrix)
    }
    #[allow(dead_code)]
    fn read_chars(&mut self) -> BoxResult<Vec<char>> {
        self.reader.read_line(&mut self.buffer)?;
        let chars = self.buffer.trim().chars().collect::<Vec<_>>();
        self.buffer.clear();
        Ok(chars)
    }
}


Measured memory_bytes: 14588