#include <bits/stdc++.h>   struct {     inline operator int() {       int x;       return scanf( %d , &x), x;     }     inline operator long long() {       long long x;       return scanf( %lld , &x), x;     }     template <class T>     inline void operator()(T &x) {       x = *this;     }     template <class T, class... A>     inline void operator()(T &x, A &...a) {       x = *this;       this->operator()(a...);     }   } read;   const int maxn = 120005;   long long his[maxn << 2];   int min[maxn << 2], tot[maxn << 2], mot[maxn << 2], pat[maxn << 2];   void modi(int now, int x) {     min[now] += x;     mot[now] += x;   }   void pass(int now, int x) {     his[now] += 1ll * tot[now] * x;     pat[now] += x;   }   void push(int now) {     if (mot[now]) {       modi((now << 1), mot[now]);       modi((now << 1 | 1), mot[now]);       mot[now] = 0;     }     if (pat[now]) {       if (min[(now << 1)] == min[now]) pass((now << 1), pat[now]);       if (min[(now << 1 | 1)] == min[now]) pass((now << 1 | 1), pat[now]);       pat[now] = 0;     }   }   void modify(int now, int L, int R, int l, int r, int x) {     if (r < L or l > R) return;     if (l <= L and R <= r) return modi(now, x);     push(now);     int M = (L + R) >> 1;     modify((now << 1), L, M, l, r, x);     modify((now << 1 | 1), M + 1, R, l, r, x);     his[now] = his[(now << 1)] + his[(now << 1 | 1)];     min[now] = std::min(min[(now << 1)], min[(now << 1 | 1)]);     tot[now] = 0;     if (min[(now << 1)] == min[now]) tot[now] += tot[(now << 1)];     if (min[(now << 1 | 1)] == min[now]) tot[now] += tot[(now << 1 | 1)];   }   long long query(int now, int L, int R, int l, int r) {     if (r < L or l > R) return 0;     if (l <= L and R <= r) return his[now];     push(now);     int M = (L + R) >> 1;     return query((now << 1), L, M, l, r) + query((now << 1 | 1), M + 1, R, l, r);   }   void build(int now, int L, int R) {     min[now] = L;     tot[now] = 1;     if (L == R) return;     int M = (L + R) >> 1;     build((now << 1), L, M);     build((now << 1 | 1), M + 1, R);   }   void test(int now, int L, int R) {     if (L == R) {       fprintf(stderr,   %d , min[now]);       return;     }     push(now);     int M = (L + R) >> 1;     test((now << 1), L, M);     test((now << 1 | 1), M + 1, R);     if (now == 1) fprintf(stderr,   n );   }   int a[maxn];   long long ans[maxn];   int st1[maxn], sp1;   int st2[maxn], sp2;   std::vector<std::pair<int, int> > v[maxn];   int main() {     int n = read;     for (int i = 1; i <= n; i++) read(a[i]);     int q = read;     for (int i = 1; i <= q; i++) {       int l = read, r = read;       v[r].push_back(std::pair<int, int>(l, i));     }     build(1, 1, n);     for (int r = 1; r <= n; r++) {       while (sp2 and a[st2[sp2]] > a[r])         modify(1, 1, n, st2[sp2 - 1] + 1, st2[sp2], a[st2[sp2]]), --sp2;       st2[++sp2] = r;       modify(1, 1, n, st2[sp2 - 1] + 1, st2[sp2], -a[st2[sp2]]);       while (sp1 and a[st1[sp1]] < a[r])         modify(1, 1, n, st1[sp1 - 1] + 1, st1[sp1], -a[st1[sp1]]), --sp1;       st1[++sp1] = r;       modify(1, 1, n, st1[sp1 - 1] + 1, st1[sp1], a[st1[sp1]]);       modi(1, -1);       pass(1, 1);       for (std::pair<int, int> p : v[r])         ans[p.second] = query(1, 1, n, p.first, r);     }     for (int i = 1; i <= q; i++) printf( %lld n , ans[i]);   }