#include <bits/stdc++.h>
#include <atcoder/all>
using namespace std;
using namespace atcoder;
//using mint = modint1000000007;
//const int mod = 1000000007;
//using mint = modint998244353;
//const int mod = 998244353;
const int INF = 1e9;
//const long long LINF = 1e18;
#define rep(i, n) for (int i = 0; i < (n); ++i)
#define rep2(i,l,r)for(int i=(l);i<(r);++i)
#define rrep(i, n) for (int i = (n-1); i >= 0; --i)
#define rrep2(i,l,r)for(int i=(r-1);i>=(l);--i)
#define all(x) (x).begin(),(x).end()
#define allR(x) (x).rbegin(),(x).rend()
#define endl "\n"
#define P pair<long long,long long>
template<typename A, typename B> inline bool chmax(A & a, const B & b) { if (a < b) { a = b; return true; } return false; }
template<typename A, typename B> inline bool chmin(A & a, const B & b) { if (a > b) { a = b; return true; } return false; }

P op(P a, P b) { return { a.first + b.first,a.second + b.second }; }
P e() { return { 0,0 }; }
int op0(int a, int b) { return a + b; }
int e0() { return 0; }
int main() {
	ios::sync_with_stdio(false);
	cin.tie(nullptr);
	int n, q; cin >> n >> q;
	vector<int>a(n);
	vector<P>p;
	rep(i, n) {
		cin >> a[i];
		p.push_back({ a[i],i });
	}
	sort(all(p));
	vector<int>l(q), r(q);
	rep(i, q) cin >> l[i] >> r[i], l[i]--;

	vector<int>ok(q, n), ng(q, -1);
	while (true) {
		bool fin = true;
		vector<vector<int>>mid(n);
		rep(i, q) {
			if (abs(ok[i] - ng[i]) > 1) {
				fin = false;
				int m = (ok[i] + ng[i]) / 2;
				mid[m].push_back(i);
			}
		}
		if (fin)break;
		segtree<int, op0, e0>seg(n);
		rep(i, n) {
			seg.set(p[i].second, 1);
			rep(j, mid[i].size()) {
				int get = seg.prod(l[mid[i][j]], r[mid[i][j]]);
				int sz = r[mid[i][j]] - l[mid[i][j]] + 1;
				sz = (sz + 1) / 2;
				if (get >= sz)ok[mid[i][j]] = i;
				else ng[mid[i][j]] = i;
			}
		}
	}
	//rep(i, q) cout << ok[i] << "_" << p[ok[i]].first << endl;
	vector<pair<int, P>>eve;
	rep(i, n) eve.push_back({ a[i],{i, 0} });
	rep(i, q) eve.push_back({ (int)p[ok[i]].first,{i, 1} });
	vector<long long>ans(q);
	sort(all(eve));
	rep(_, 2) {
		segtree<P, op, e>seg(n);
		rep(i, eve.size()) {
			int t = eve[i].second.second;
			int id = eve[i].second.first;
			int val = eve[i].first;
			if (0 == t) {
				seg.set(id, { val,1 });
			}
			else {
				auto get = seg.prod(l[id], r[id]);
				long long val = get.second * p[ok[id]].first - get.first;
				ans[id] += abs(val);
			}
		}
		reverse(all(eve));
	}
	rep(i, q) cout << ans[i] << endl;
	return 0;
}