#include <algorithm>
#include <bits/stdc++.h>
#include <climits>
#include <iterator>
using namespace std;

typedef long long ll;
typedef unsigned long long ull;
typedef vector<int> vi;
typedef pair<int, int> ii;
typedef vector<ii> vii;
typedef long double ld;
typedef pair<ll, ll> pll;
#define FOR(i, a, b) for(int i = a; i < b; i++)
#define ROF(i, a, b) for(int i = a; i >= b; i--)
#define ms memset
#define pb push_back
#define fi first
#define se second
#define inp(n, a) vector<ll> a;for(int i=0;i<n;i++){ll now;cin>>now;a.pb(now);}
#define all(a) a.begin(),a.end()
#define show(a) for(long long loppls=0;loppls<(long long)(a.size()-1);loppls++)cout<<a[loppls]<<' ';cout<<a[a.size()-1];

#ifdef reimufumo
#define owo(x) std::cerr << x;
#define ovo(a) for(long long loppls=0;loppls<(long long)(a.size()-1);loppls++)cerr<<a[loppls]<<' ';cerr<<a[a.size()-1];
#define ouo(a,x) for(long long loppls=0;loppls<x-1;loppls++)cerr<<a[loppls]<<" ";cerr<<a[x-1];
#define dbg(x) std::cerr << #x << " = " << (x) << " (L" << __LINE__ << ") " << __FILE__ << std::endl
#define dbgif(cond, x) ((cond) ? std::cerr << #x << " = " << (x) << " (L" << __LINE__ << ") " << __FILE__ << std::endl : std::cerr)
#else
#define owo(x) ((void)0)
#define ovo(a) ((void)0)
#define ouo(a,x) ((void)0)
#define dbg(x) ((void)0)
#define dbgif(cond, x) ((void)0)
#endif

long long binpow(long long a, long long b, long long m) {
    a %= m;
    long long res = 1;
    while (b > 0) {
        if (b & 1)
            res = res * a % m;
        a = a * a % m;
        b >>= 1;
    }
    return res;
}

long long inv(long long a, long long p){
    return binpow(a, p-2, p);
}

vector<ll> fact; // must be init if nCk needed

long long nCk(long long n, long long k, long long p){
    return ((fact[n] * inv(fact[k], p) % p) * inv(fact[n-k], p)) % p;
}

long long exgcd(long long a, long long b, long long& x, long long& y) {
    x = 1, y = 0;
    long long x1 = 0, y1 = 1, a1 = a, b1 = b;
    while (b1) {
        long long q = a1 / b1;
        tie(x, x1) = make_tuple(x1, x - q * x1);
        tie(y, y1) = make_tuple(y1, y - q * y1);
        tie(a1, b1) = make_tuple(b1, a1 - q * b1);
    }
    return a1;
}

ll sum2(ll a, ll l, ll n){return (n*(a+l))/2;}
ll ceil2(ll a, ll b){ll c=a/b;if(a%b!=0)c++;return c;}
ll floor2(ll x, ll m){ll r=(x%m+m)%m;return (x-r)/m;}

const ll INF=1e16,MAX=100020,MOD=998244353;

void solve() {
    ll n,q;cin>>n>>q;
    ll a[n+1];
    memset(a,0,sizeof(a));
    for(int i=1;i<=n;i++)cin>>a[i];
    
    ll tmp[MAX];
    memset(tmp,0,sizeof(tmp));
    for(int i=1;i<=n;i++)tmp[i]=a[i];
    sort(tmp+1,tmp+n+1);
    ll len=unique(tmp+1,tmp+n+1)-(tmp+1);
    for(int i=1;i<=n;i++)a[i]=lower_bound(tmp+1,tmp+len+1,a[i])-tmp;

    ouo(a,n+1);owo('\n');
    ll raw[n+1],pf[n+1];
    memset(raw,0,sizeof(raw));
    memset(pf,0,sizeof(pf));
    for(int i=1;i<=n;i++)raw[a[i]]++;
    for(int i=1;i<=n;i++)pf[i]=pf[i-1]+raw[i];
    ouo(raw,n+1);owo('\n');
    ouo(pf,n+1);owo('\n');
    while(q--){
        ll u,v;cin>>u>>v;
        owo(u<<' '<<v<<' '<<a[u]<<' '<<a[v]<<'\n');
        cout<<max(0ll,pf[a[u]-1]-pf[a[v]])<<'\n';
    }
}

int main() {
	ios::sync_with_stdio(false);
	cin.tie(NULL);

	solve();
}