#include <cstdio>
#include <cstring>
#include <iostream>
#include <string>
#include <cmath>
#include <bitset>
#include <vector>
#include <map>
#include <set>
#include <queue>
#include <deque>
#include <algorithm>
#include <complex>
#include <unordered_map>
#include <unordered_set>
#include <random>
#include <cassert>
#include <fstream>
#include <utility>
#include <functional>
#include <time.h>
#include <stack>
#include <array>
#define popcount __builtin_popcount
using namespace std;
typedef long long int ll;
typedef pair<int, ll> P;
template<typename T>
struct BIT{ //1-indexed
    vector<T> bit;
    int size;
    BIT(int n):size(n), bit(n+1, 0){}
	void init(){
		fill(bit.begin(), bit.end(), 0);
	}
    T sum(int i){
        T s=0;
        while(i>0){
            s+=bit[i];
            i-=(i&(-i));
        }
        return s;
    }
    void add(int i, T x){
        while(i<=size){
            bit[i]+=x;
            i+=(i&(-i));
        }
    }
};
int main()
{
	int n;
	cin>>n;
	int a[200020];
	vector<int> v(n);
	for(int i=0; i<n; i++){
		cin>>a[i];
		v[i]=a[i];
	}
	sort(v.begin(), v.end());
	v.erase(unique(v.begin(), v.end()), v.end());
	for(int i=0; i<n; i++) a[i]=lower_bound(v.begin(), v.end(), a[i])-v.begin();
	int m=v.size();
	BIT<ll> bit(m);
	ll c1[200020];
	for(int i=0; i<n; i++){
		c1[i]=bit.sum(a[i]);
		bit.add(a[i]+1, 1);
	}
	bit.init();
	ll c2[200020];
	for(int i=n-1; i>=0; i--){
		c2[i]=bit.sum(a[i]);
		bit.add(a[i]+1, 1);
	}
	ll c[200020]={};
	for(int i=0; i<n; i++){
		c[i]+=c1[i]*c2[i];
	}
	ll x[200020]={}, x1[200020]={};
	for(int i=0; i<n; i++) x[a[i]]++;
	bit.init();
	for(int i=0; i<n; i++){
		c[i]-=bit.sum(a[i]);
		bit.add(a[i]+1, -x1[a[i]]*(x[a[i]]-x1[a[i]]));
		x1[a[i]]++;
		bit.add(a[i]+1, x1[a[i]]*(x[a[i]]-x1[a[i]]));
	}
	bit.init();
	for(int i=0; i<n; i++){
		c1[i]=i-bit.sum(a[i]+1);
		bit.add(a[i]+1, 1);
	}
	bit.init();
	for(int i=n-1; i>=0; i--){
		c2[i]=n-1-i-bit.sum(a[i]+1);
		bit.add(a[i]+1, 1);
	}
	for(int i=0; i<n; i++){
		c[i]+=c1[i]*c2[i];
	}
	fill(x1, x1+m+1, 0);
	bit.init();
	for(int i=0; i<n; i++){
		c[i]-=(bit.sum(m)-bit.sum(a[i]+1));
		bit.add(a[i]+1, -x1[a[i]]*(x[a[i]]-x1[a[i]]));
		x1[a[i]]++;
		bit.add(a[i]+1, x1[a[i]]*(x[a[i]]-x1[a[i]]));
	}
	P p[200020];
	for(int i=0; i<n; i++) p[i]=P(a[i], c[i]);
	sort(p, p+n);
	ll t[200020]; t[0]=0;
	for(int i=0; i<n; i++) t[i+1]=t[i]+p[i].second;
	int q; cin>>q;
	for(int i=0; i<q; i++){
		int l, h; cin>>l>>h; h++;
		l=lower_bound(v.begin(), v.end(), l)-v.begin();
		h=lower_bound(v.begin(), v.end(), h)-v.begin();
		l=lower_bound(p, p+n, P(l, 0))-p;
		h=lower_bound(p, p+n, P(h, 0))-p;
		cout<<t[h]-t[l]<<endl;
	}
 	return 0;
}