//"Never be ashamed of where you are when you start. Skyscrapers are built from the ground up."
#include <bits/stdc++.h>
using namespace std;
using ll = long long;
using db = long double;
using str = string;
using pii = pair<int, int>;
#define fi first
#define se second
#define pb push_back
#define lb lower_bound
#define ub upper_bound
#define all(x) (x).begin(), (x).end()
#define nl cout << '\n';
#define itn int
#define pi acos(-1.0)
#define task ""
/** Optimization **/
void fastIO(){
ios_base::sync_with_stdio(false);
cin.tie(NULL);
cout.tie(NULL);
if (fopen(task".INP", "r")){
freopen(task".INP", "r", stdin);
freopen(task".OUT", "w", stdout);
}
}
/** Variables **/
const ll INF = 1e18+1;
const ll MOD = 998244353; //1e9+7;
int n, m, x, y;
int a[50005], b[50005], sta[17][50005], stb[17][50005];
/** Functions **/
/** Main code **/
void RPMCPP(){
int i, j, k, res;
cin >> n >> m;
for (i = 1; i <= n; i++){
cin >> a[i];
b[n-i+1] = a[i];
}
for (i = 1; i <= n; i++){
sta[0][i] = a[i];
stb[0][i] = b[i];
}
for (i = 1; i <= 16; i++){
for (j = 1; j+(1<<i)-1 <= n; j++){
sta[i][j] = max(sta[i-1][j], sta[i-1][j+(1<<(i-1))]);
stb[i][j] = max(stb[i-1][j], stb[i-1][j+(1<<(i-1))]);
}
}
res = 0;
while (m--){
cin >> x >> y;
if (x <= y){
y--;
k = __lg(y-x+1);
if (a[x] == max(sta[k][x], sta[k][y-(1<<k)+1])){
res++;
}
} else {
x--;
swap(x, y);
k = __lg(y-x+1);
if (b[x] == max(stb[k][x], stb[k][y-(1<<k)+1])){
res++;
}
}
}
cout << res;
}
signed main(){
fastIO();
RPMCPP();
}
Ly8iTmV2ZXIgYmUgYXNoYW1lZCBvZiB3aGVyZSB5b3UgYXJlIHdoZW4geW91IHN0YXJ0LiBTa3lzY3JhcGVycyBhcmUgYnVpbHQgZnJvbSB0aGUgZ3JvdW5kIHVwLiIKI2luY2x1ZGUgPGJpdHMvc3RkYysrLmg+CnVzaW5nIG5hbWVzcGFjZSBzdGQ7CnVzaW5nIGxsID0gbG9uZyBsb25nOwp1c2luZyBkYiA9IGxvbmcgZG91YmxlOwp1c2luZyBzdHIgPSBzdHJpbmc7CnVzaW5nIHBpaSA9IHBhaXI8aW50LCBpbnQ+OwojZGVmaW5lIGZpIGZpcnN0CiNkZWZpbmUgc2Ugc2Vjb25kCiNkZWZpbmUgcGIgcHVzaF9iYWNrCiNkZWZpbmUgbGIgbG93ZXJfYm91bmQKI2RlZmluZSB1YiB1cHBlcl9ib3VuZAojZGVmaW5lIGFsbCh4KSAoeCkuYmVnaW4oKSwgKHgpLmVuZCgpCiNkZWZpbmUgbmwgY291dCA8PCAnXG4nOwojZGVmaW5lIGl0biBpbnQKI2RlZmluZSBwaSBhY29zKC0xLjApCiNkZWZpbmUgdGFzayAiIgoKLyoqIE9wdGltaXphdGlvbiAqKi8Kdm9pZCBmYXN0SU8oKXsKICAgIGlvc19iYXNlOjpzeW5jX3dpdGhfc3RkaW8oZmFsc2UpOwogICAgY2luLnRpZShOVUxMKTsKICAgIGNvdXQudGllKE5VTEwpOwogICAgaWYgKGZvcGVuKHRhc2siLklOUCIsICJyIikpewogICAgICAgIGZyZW9wZW4odGFzayIuSU5QIiwgInIiLCBzdGRpbik7CiAgICAgICAgZnJlb3Blbih0YXNrIi5PVVQiLCAidyIsIHN0ZG91dCk7CiAgICB9Cn0KCi8qKiBWYXJpYWJsZXMgKiovCmNvbnN0IGxsIElORiA9IDFlMTgrMTsKY29uc3QgbGwgTU9EID0gOTk4MjQ0MzUzOyAvLzFlOSs3OwppbnQgbiwgbSwgeCwgeTsKaW50IGFbNTAwMDVdLCBiWzUwMDA1XSwgc3RhWzE3XVs1MDAwNV0sIHN0YlsxN11bNTAwMDVdOwoKLyoqIEZ1bmN0aW9ucyAqKi8KCgovKiogTWFpbiBjb2RlICoqLwp2b2lkIFJQTUNQUCgpewogICAgaW50IGksIGosIGssIHJlczsKICAgIGNpbiA+PiBuID4+IG07CiAgICBmb3IgKGkgPSAxOyBpIDw9IG47IGkrKyl7CiAgICAgICAgY2luID4+IGFbaV07CiAgICAgICAgYltuLWkrMV0gPSBhW2ldOwogICAgfQogICAgZm9yIChpID0gMTsgaSA8PSBuOyBpKyspewogICAgICAgIHN0YVswXVtpXSA9IGFbaV07CiAgICAgICAgc3RiWzBdW2ldID0gYltpXTsKICAgIH0KICAgIGZvciAoaSA9IDE7IGkgPD0gMTY7IGkrKyl7CiAgICAgICAgZm9yIChqID0gMTsgaisoMTw8aSktMSA8PSBuOyBqKyspewogICAgICAgICAgICBzdGFbaV1bal0gPSBtYXgoc3RhW2ktMV1bal0sIHN0YVtpLTFdW2orKDE8PChpLTEpKV0pOwogICAgICAgICAgICBzdGJbaV1bal0gPSBtYXgoc3RiW2ktMV1bal0sIHN0YltpLTFdW2orKDE8PChpLTEpKV0pOwogICAgICAgIH0KICAgIH0KICAgIHJlcyA9IDA7CiAgICB3aGlsZSAobS0tKXsKICAgICAgICBjaW4gPj4geCA+PiB5OwogICAgICAgIGlmICh4IDw9IHkpewogICAgICAgICAgICB5LS07CiAgICAgICAgICAgIGsgPSBfX2xnKHkteCsxKTsKICAgICAgICAgICAgaWYgKGFbeF0gPT0gbWF4KHN0YVtrXVt4XSwgc3RhW2tdW3ktKDE8PGspKzFdKSl7CiAgICAgICAgICAgICAgICByZXMrKzsKICAgICAgICAgICAgfQogICAgICAgIH0gZWxzZSB7CiAgICAgICAgICAgIHgtLTsKICAgICAgICAgICAgc3dhcCh4LCB5KTsKICAgICAgICAgICAgayA9IF9fbGcoeS14KzEpOwogICAgICAgICAgICBpZiAoYlt4XSA9PSBtYXgoc3RiW2tdW3hdLCBzdGJba11beS0oMTw8aykrMV0pKXsKICAgICAgICAgICAgICAgIHJlcysrOwogICAgICAgICAgICB9CiAgICAgICAgfQogICAgfQogICAgY291dCA8PCByZXM7Cn0KCnNpZ25lZCBtYWluKCl7CiAgICBmYXN0SU8oKTsKICAgIFJQTUNQUCgpOwp9