# input
import sys
input = sys.stdin.readline
II = lambda : int(input())
MI = lambda : map(int, input().split())
LI = lambda : [int(a) for a in input().split()]
SI = lambda : input().rstrip()
LLI = lambda n : [[int(a) for a in input().split()] for _ in range(n)]
LSI = lambda n : [input().rstrip() for _ in range(n)]
MI_1 = lambda : map(lambda x:int(x)-1, input().split())
LI_1 = lambda : [int(a)-1 for a in input().split()]

mod = 998244353
inf = 1001001001001001001
ordalp = lambda s : ord(s)-65 if s.isupper() else ord(s)-97
ordallalp = lambda s : ord(s)-39 if s.isupper() else ord(s)-97
yes = lambda : print("Yes")
no = lambda : print("No")
yn = lambda flag : print("Yes" if flag else "No")

prinf = lambda ans : print(ans if ans < 1000001001001001001 else -1)
alplow = "abcdefghijklmnopqrstuvwxyz"
alpup = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
alpall = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"
URDL = {'U':(-1,0), 'R':(0,1), 'D':(1,0), 'L':(0,-1)}
DIR_4 = [[-1,0],[0,1],[1,0],[0,-1]]
DIR_8 = [[-1,0],[-1,1],[0,1],[1,1],[1,0],[1,-1],[0,-1],[-1,-1]]
DIR_BISHOP = [[-1,1],[1,1],[1,-1],[-1,-1]]
prime60 = [2,3,5,7,11,13,17,19,23,29,31,37,41,43,47,53,59]
sys.set_int_max_str_digits(0)
# sys.setrecursionlimit(10**6)
# import pypyjit
# pypyjit.set_param('max_unroll_recursion=-1')

from collections import defaultdict,deque
from heapq import heappop,heappush
from bisect import bisect_left,bisect_right
DD = defaultdict
BSL = bisect_left
BSR = bisect_right

class LazySegTree:
    __slots__ = ["n", "log", "size", "data", "lazy", "e", "op", "mapping", "composition", "id"]
    
    def push(self, k):
        # self.all_apply(2 * k, self.lazy[k])
        self.data[2 * k] = self.mapping(self.lazy[k], self.data[2 * k])
        if 2 * k < self.size:
            self.lazy[2 * k] = self.composition(self.lazy[k], self.lazy[2 * k])

        # self.all_apply(2 * k + 1, self.lazy[k])
        self.data[2 * k + 1] = self.mapping(self.lazy[k], self.data[2 * k + 1])
        if 2 * k < self.size:
            self.lazy[2 * k + 1] = self.composition(self.lazy[k], self.lazy[2 * k + 1])

        self.lazy[k] = self.id

    def __init__(self, op, e, mapping, composition, id, lst):
        self.n = len(lst)
        self.log = (self.n - 1).bit_length()
        self.size = 1 << self.log
        self.data = [e] * (2 * self.size)
        self.lazy = [id] * (2 * self.size)
        self.e = e
        self.op = op
        self.mapping = mapping
        self.composition = composition
        self.id = id
        for i in range(self.n):
            self.data[self.size + i] = lst[i]
        for i in range(self.size - 1, 0, -1):
            # self.update(i)
            self.data[i] = self.op(self.data[i << 1], self.data[(i << 1) | 1])

    def set(self, p, x):
        assert 0 <= p and p < self.n
        p += self.size
        for i in range(self.log, 0, -1):
            self.push(p >> i)
        self.data[p] = x
        for i in range(1, self.log + 1):
            # self.update(p >> i)
            k = p >> i
            self.data[k] = self.op(self.data[k << 1], self.data[(k << 1) | 1])

    def get(self, p):
        assert 0 <= p and p < self.n
        p += self.size
        for i in range(self.log, 0, -1):
            self.push(p >> i)
        return self.data[p]

    def prod(self, l, r):
        assert 0 <= l and l <= r and r <= self.n
        if l == r:
            return self.e
        l += self.size
        r += self.size
        for i in range(self.log, 0, -1):
            if ((l >> i) << i) != l:
                self.push(l >> i)
            if ((r >> i) << i) != r:
                self.push(r >> i)
        sml, smr = self.e, self.e
        while l < r:
            if l & 1:
                sml = self.op(sml, self.data[l])
                l += 1
            if r & 1:
                r -= 1
                smr = self.op(self.data[r], smr)
            l >>= 1
            r >>= 1
        return self.op(sml, smr)

    def all_prod(self):
        return self.data[1]

    def apply_point(self, p, f):
        assert 0 <= p and p < self.n
        p += self.size
        for i in range(self.log, 0, -1):
            self.push(p >> i)
        self.data[p] = self.mapping(f, self.data[p])
        for i in range(1, self.log + 1):
            # self.update(p >> i)
            k = p >> i
            self.data[k] = self.op(self.data[k << 1], self.data[(k << 1) | 1])

    def apply(self, l, r, f):
        assert 0 <= l and l <= r and r <= self.n
        if l == r:
            return
        l += self.size
        r += self.size
        for i in range(self.log, 0, -1):
            if ((l >> i) << i) != l:
                self.push(l >> i)
            if ((r >> i) << i) != r:
                self.push((r - 1) >> i)
        l2, r2 = l, r
        while l < r:
            if l & 1:
                # self.all_apply(l, f)
                self.data[l] = self.mapping(f, self.data[l])
                if l < self.size:
                    self.lazy[l] = self.composition(f, self.lazy[l])
                l += 1
            if r & 1:
                r -= 1
                # self.all_apply(r, f)
                self.data[r] = self.mapping(f, self.data[r])
                if l < self.size:
                    self.lazy[r] = self.composition(f, self.lazy[r])
            l >>= 1
            r >>= 1
        l, r = l2, r2
        for i in range(1, self.log + 1):
            if ((l >> i) << i) != l:
                # self.update(l >> i)
                k = l >> i
                self.data[k] = self.op(self.data[k << 1], self.data[(k << 1) | 1])
            if ((r >> i) << i) != r:
                # self.update((r - 1) >> i)
                k = (r - 1) >> i
                self.data[k] = self.op(self.data[k << 1], self.data[(k << 1) | 1])

    def max_right(self, l, g):
        assert 0 <= l and l <= self.n
        assert g(self.e)
        if l == self.n:
            return self.n
        l += self.size
        for i in range(self.log, 0, -1):
            self.push(l >> i)
        sm = self.e
        while 1:
            while l % 2 == 0:
                l >>= 1
            if not (g(self.op(sm, self.data[l]))):
                while l < self.size:
                    self.push(l)
                    l = 2*l
                    if g(self.op(sm, self.data[l])):
                        sm = self.op(sm, self.data[l])
                        l += 1
                return l - self.size
            sm = self.op(sm, self.data[l])
            l += 1
            if (l&-l) == l: break
        return self.n

    def min_left(self, r, g):
        assert 0 <= r and r <= self.n
        assert g(self.e)
        if r == 0: return 0
        r += self.size
        for i in range(self.log, 0, -1):
            self.push((r - 1) >> i)
        sm = self.e
        while 1:
            r -= 1
            while r > 1 and (r % 2):
                r >>= 1
            if not (g(self.op(self.data[r], sm))):
                while r < self.size:
                    self.push(r)
                    r = 2*r + 1
                    nsm = self.op(self.data[r], sm) 
                    if g(nsm):
                        sm = nsm
                        r -= 1
                return r + 1 - self.size
            sm = self.op(self.data[r], sm)
            if (r&-r) == r: break
        return 0
    
    def __str__(self):
        return str([self.get(i) for i in range(self.n)])


class BIT:
    __slots__ = ["n", "data"]
    
    def __init__(self, n):
        self.n = n
        self.data = [0]*(n+1)
    
    def build(self, arr):
        for i,a in enumerate(arr):
            self.data[i+1] = a
        for i in range(1, self.n+1):
            if i + (i&-i) <= self.n:
                self.data[i + (i&-i)] += self.data[i]
    
    def add(self, p, x):
        p += 1
        while p <= self.n:
            self.data[p] += x
            p += p& -p
    
    def sum0(self, r):
        s = 0
        while r:
            s += self.data[r]
            r -= r& -r
        return s
    
    def sum(self, l, r):
        s = 0
        while r:
            s += self.data[r]
            r -= r& -r
        while l:
            s -= self.data[l]
            l -= l& -l
        return s
    
    def get(self, p):
        return self.sum0(p+1) - self.sum0(p)

    def bisect_left(self, w):
        """
        not velify
        
        if sum0(n) < w:
            n+1
        else:
            min( x | sum0(x) >= w)
        """
        if w <= 0: return 0
        x = 0
        r = 1 << self.n.bit_length()
        while r:
            if x + r <= self.n and self.data[x + r] < w:
                w -= self.data[x + r]
                x += r
            r >>= 1
        return x + 1
    
    def bisect_right(self, w):
        """
        max( x | sum0(x) <= w)
        """
        assert w >= 0
        x = 0
        r = 1 << self.n.bit_length()
        while r:
            if x + r <= self.n and self.data[x + r] <= w:
                w -= self.data[x + r]
                x += r
            r >>= 1
        return x

    def __str__(self):
        return str([self.get(i) for i in range(self.n)])

n, q = MI()
a = LI_1()

inva = [0] * n
for i in range(n):
    inva[a[i]] = i

qry = [[] for i in range(n)]
for i in range(q):
    l, r = MI()
    l -= 1
    qry[l].append((r, i))
    
# 自分より前に大きいのがあるかどうか
# なくなるのは 1 回のみ

def add(x, y):
    return x + y

f = BIT(n) # 自分より前に大きいのがある個数
ls = LazySegTree(min, inf, add, add, 0, [0] * n)

for i in reversed(range(n)):
    ls.set(a[i], 0)
    ls.apply(0, a[i], 1)

for i in range(n):
    if ls.get(i) != 0:
        f.add(inva[i], 1)
    else:
        ls.set(i, inf)

# print(ls)
# print(f)
# print()

ans = [0] * q
for l in range(n):
    for r, i in qry[l]:
        ans[i] = f.sum(l, r)
    
    x = a[l]
    ls.apply(0, x, -1)
    while True:
        y = ls.min_left(x, lambda c : c > 0) - 1
        # print(y, l, ls)
        if y == -1:
            break
        f.add(inva[y], -1)
        ls.set(y, inf)
        x = y
    
    # print(ls)
    # print(f)
    # print()

# print(inva)

print(*ans, sep = "\n")