#include<unordered_map>
#include<unordered_set>
#include<functional>
#include<algorithm>
#include<iostream>
#include<hash_map>
#include<iterator>
#include<iomanip>
#include<numeric>
#include<cstring>
#include<vector>
#include<string>
#include<deque>
#include<stack>
#include<queue>
#include<array>
#include<cmath>
#include<list>
#include<map>
#include<set>
using namespace std;
typedef long long ll;
typedef unsigned long long ull;
typedef double db;
#define pii pair<int,int>
#define pll pair<ll,ll>
#define inf INT32_MAX
#define linf INT64_MAX
#define pf push_front
#define pb push_back
#define ppb pop_back
#define ppf pop_front
#define ff first
#define ss second
const int mod=1e9+7,N=5e4+5,logN=18;
ll Pow(ll b,ll p){
if(!p)return 1;
if(p==1)return b;
ll tmp=Pow(b,p/2);
tmp=(tmp*tmp);
if(p&1)tmp=(tmp*b);
return tmp;
}
int n,q,a[N],st[N][logN],Log[N],ans;
void calcLog(){
Log[1]=0;
for(int i=2;i<N;++i)Log[i]=Log[i/2]+1;
}
void preComp(){
for(int i=0;i<n;++i)st[i][0]=a[i];
for(int i=1;i<=Log[n];++i){
for(int j=0;j+(1<<i)-1<n;++j){
st[j][i]=max(st[j][i-1],st[j+(1<<(i-1))][i-1]);
}
}
}
int qAnswer(int l,int r){
int length=r-l+1;
return max(st[l][Log[length]],st[r-(1<<Log[length])+1][Log[length]]);
}
bool solve(){
cin>>n>>q;
for(int i=0;i<n;++i)cin>>a[i];
calcLog();
preComp();
for(int i=0;i<q;++i){
int l,r;
cin>>l>>r;
l--,r--;
if((r-l-1)>0){
if(a[l]>=qAnswer(l+1,r-1))ans++;
}
else ans++;
}
cout<<ans;
}
int main(){
ios_base::sync_with_stdio(false);
cin.tie(nullptr);
int t=1;
//cin>>t;
while(t--){
solve();
}
}
I2luY2x1ZGU8dW5vcmRlcmVkX21hcD4KI2luY2x1ZGU8dW5vcmRlcmVkX3NldD4KI2luY2x1ZGU8ZnVuY3Rpb25hbD4KI2luY2x1ZGU8YWxnb3JpdGhtPgojaW5jbHVkZTxpb3N0cmVhbT4KI2luY2x1ZGU8aGFzaF9tYXA+CiNpbmNsdWRlPGl0ZXJhdG9yPgojaW5jbHVkZTxpb21hbmlwPgojaW5jbHVkZTxudW1lcmljPgojaW5jbHVkZTxjc3RyaW5nPgojaW5jbHVkZTx2ZWN0b3I+CiNpbmNsdWRlPHN0cmluZz4KI2luY2x1ZGU8ZGVxdWU+CiNpbmNsdWRlPHN0YWNrPgojaW5jbHVkZTxxdWV1ZT4KI2luY2x1ZGU8YXJyYXk+CiNpbmNsdWRlPGNtYXRoPgojaW5jbHVkZTxsaXN0PgojaW5jbHVkZTxtYXA+CiNpbmNsdWRlPHNldD4KdXNpbmcgbmFtZXNwYWNlIHN0ZDsKdHlwZWRlZiBsb25nIGxvbmcgbGw7CnR5cGVkZWYgdW5zaWduZWQgbG9uZyBsb25nIHVsbDsKdHlwZWRlZiBkb3VibGUgZGI7CiNkZWZpbmUgcGlpIHBhaXI8aW50LGludD4KI2RlZmluZSBwbGwgcGFpcjxsbCxsbD4KI2RlZmluZSBpbmYgSU5UMzJfTUFYCiNkZWZpbmUgbGluZiBJTlQ2NF9NQVgKI2RlZmluZSBwZiBwdXNoX2Zyb250CiNkZWZpbmUgcGIgcHVzaF9iYWNrCiNkZWZpbmUgcHBiIHBvcF9iYWNrCiNkZWZpbmUgcHBmIHBvcF9mcm9udAojZGVmaW5lIGZmIGZpcnN0CiNkZWZpbmUgc3Mgc2Vjb25kCmNvbnN0IGludCBtb2Q9MWU5KzcsTj01ZTQrNSxsb2dOPTE4OwpsbCBQb3cobGwgYixsbCBwKXsKICAgIGlmKCFwKXJldHVybiAxOwogICAgaWYocD09MSlyZXR1cm4gYjsKICAgIGxsIHRtcD1Qb3coYixwLzIpOwogICAgdG1wPSh0bXAqdG1wKTsKICAgIGlmKHAmMSl0bXA9KHRtcCpiKTsKICAgIHJldHVybiB0bXA7Cn0KaW50IG4scSxhW05dLHN0W05dW2xvZ05dLExvZ1tOXSxhbnM7Cgp2b2lkIGNhbGNMb2coKXsKICAgIExvZ1sxXT0wOwogICAgZm9yKGludCBpPTI7aTxOOysraSlMb2dbaV09TG9nW2kvMl0rMTsKfQoKdm9pZCBwcmVDb21wKCl7CiAgICBmb3IoaW50IGk9MDtpPG47KytpKXN0W2ldWzBdPWFbaV07CgogICAgZm9yKGludCBpPTE7aTw9TG9nW25dOysraSl7CiAgICAgICAgZm9yKGludCBqPTA7aisoMTw8aSktMTxuOysrail7CiAgICAgICAgICAgIHN0W2pdW2ldPW1heChzdFtqXVtpLTFdLHN0W2orKDE8PChpLTEpKV1baS0xXSk7CiAgICAgICAgfQogICAgfQp9CgppbnQgcUFuc3dlcihpbnQgbCxpbnQgcil7CiAgICBpbnQgbGVuZ3RoPXItbCsxOwogICAgcmV0dXJuIG1heChzdFtsXVtMb2dbbGVuZ3RoXV0sc3Rbci0oMTw8TG9nW2xlbmd0aF0pKzFdW0xvZ1tsZW5ndGhdXSk7Cn0KCmJvb2wgc29sdmUoKXsKICAgIGNpbj4+bj4+cTsKICAgIGZvcihpbnQgaT0wO2k8bjsrK2kpY2luPj5hW2ldOwogICAgY2FsY0xvZygpOwogICAgcHJlQ29tcCgpOwogICAgZm9yKGludCBpPTA7aTxxOysraSl7CiAgICAgICAgaW50IGwscjsKICAgICAgICBjaW4+Pmw+PnI7CiAgICAgICAgbC0tLHItLTsKICAgICAgICBpZigoci1sLTEpPjApewogICAgICAgICAgICBpZihhW2xdPj1xQW5zd2VyKGwrMSxyLTEpKWFucysrOwogICAgICAgIH0KICAgICAgICBlbHNlIGFucysrOwogICAgfQogICAgY291dDw8YW5zOwp9CmludCBtYWluKCl7CiAgICBpb3NfYmFzZTo6c3luY193aXRoX3N0ZGlvKGZhbHNlKTsKICAgIGNpbi50aWUobnVsbHB0cik7CiAgICBpbnQgdD0xOwogICAgLy9jaW4+PnQ7CiAgICB3aGlsZSh0LS0pewogICAgICAgIHNvbHZlKCk7CiAgICB9Cn0=