#define DEBUG 0
#include <bits/stdc++.h>
#define loop(n) for (lint ngtkana_is_a_genius = 0; ngtkana_is_a_genius < lint(n); ngtkana_is_a_genius++)
#define rep(i, begin, end) for (lint i = lint(begin); (i) < lint(end); i++)
#define all(v) v.begin(), v.end()
#define rand(l, r) std::uniform_int_distribution<>(l, r)(mt)
using lint = long long;
auto mt = std::mt19937_64(std::random_device{}());
auto cmn = [](auto&& a, auto b){ if (a > b) {a = b; return true;} return false; };
auto cmx = [](auto&& a, auto b){ if (a < b) {a = b; return true;} return false; };
void debug_impl() { std::cerr << std::endl; }
template <typename Head, typename... Tail>
void debug_impl(Head head, Tail... tail) { std::cerr << " " << head; debug_impl(tail...); }
#if DEBUG
#define debug(...)\
  do {\
    std::cerr << std::boolalpha << "[" << #__VA_ARGS__ << "]:";\
    debug_impl(__VA_ARGS__);\
    std::cerr << std::noboolalpha;\
  } while (false)
#else
#define debug(...) {}
#endif

template < typename Container, typename Value = typename Container::value_type, std::enable_if_t<!std::is_same< Container, std::string >::value, std::nullptr_t> = nullptr>
std::istream& operator>> (std::istream& is, Container& v)
  { for (auto & x : v) { is >> x; } return is; }

template < typename Container, typename Value = typename Container::value_type, std::enable_if_t<!std::is_same< Container, std::string >::value, std::nullptr_t> = nullptr >
std::ostream& operator<< (std::ostream& os, Container const& v) {
 os << "{";
  for (auto it = v.begin(); it != v.end(); it++)
    {os << (it != v.begin() ? "," : "") << *it;}
  return os << "}";
}


int main() {
  std::cin.tie(0); std::cin.sync_with_stdio(false);
  auto conquer = [&] (auto&& conquer, auto const& a) -> lint {
    int n = a.size();
    if (a.size()==1u) return a.front() == 1;
    int l = n / 2;
    auto left = std::vector<lint>(a.begin(), a.begin() + l);
    auto right = std::vector<lint>(a.begin() + l, a.end());
    lint ans = 0;
    ans += conquer(conquer, left);
    ans += conquer(conquer, right);
    std::reverse(all(left));
    std::partial_sum(all(left), left.begin());
    std::partial_sum(all(right), right.begin());
    std::sort(all(right));
    for (lint x : left) {
      auto ub = std::lower_bound(all(right), -x);
      lint now = right.end() - ub;
      ans += now;
      debug(x,std::vector<lint>(ub,right.end()),now);
    }
    return ans;
  };

  lint n; std::cin >> n;
  lint N = n * (n + 1) / 2;
  lint M = (N + 1) / 2;
  std::vector<lint> a(n); std::cin>>a;
  debug(n,N,a);

  auto count = [&] (lint X, auto a) {
    debug(X,a);
    for (lint & x : a) {
      x = X <= x ? 1 : -1;
    }
    lint ans = conquer(conquer, a);
    return ans;
  };
  lint ge = 0, less = *std::max_element(all(a)) + 1;
  while (1 < less - ge) {
    lint X = (ge + less) / 2;
    lint k = count(X, a);
    debug(X,k,M);
    (M <= k ? ge : less) = X;
  }
  lint ans = ge;
  std::cout << ans << std::endl;
  return 0;
}

/*
答え X を二分探索です。
中央値が X 以上である区間の個数が f(X) だとして、これが ceil(区間の総数 / 2) 以上である最大の X が答えです。
f(X) を求めます。各成分を X <= x ? 1 : -1 しておくと、総和が 0 以上の区間の数を数えればよいです。
分割統治です。真ん中を決めて、そこから両側への累積和を計算です。
左側を全探索です。左側が x だとすると、右側は -x 以上のものを数えればよく、
これは累積和を取ってソートをして lower_bound でできます。
*/

Measured memory_bytes: 3456