module bbb;import std.stdio, std.array, std.string, std.conv, std.algorithm;
import std.typecons, std.range, std.random, std.math, std.container;
import std.numeric, std.bigint, core.bitop;


void main() {
    auto N = readln.chomp.to!int;
    auto A = readln.split.map!(to!long).array;
    auto M = readln.chomp.to!int;
    auto Q = iota(M).map!(_ => readln.split.map!(to!int).array).array;

    int[] solve() {
        auto ans = new int[](M);
        auto st = new SegmentTree!(int, (a,b)=>(a+b), 0)(N);
        foreach (i; 0..N-1) st.assign(i, A[i] <= A[i+1]);
        foreach (i, q; Q) {
            int l = q[0];
            int r = q[1];
            if (l == r) {
                ans[i] = 1;
            } else {
                ans[i] = st.query(l, r-1) == r - l;
            }
        }
        return ans;
    }

    auto ans1 = solve;
    foreach (i; 0..N) A[i] *= -1;
    auto ans2 = solve;

    foreach (i; 0..M) {
        writeln(ans1[i], " ", ans2[i]);
    }
}

class SegmentTree(T, alias op, T e) {
    T[] table;
    int size;
    int offset;

    this(int n) {
        size = 1;
        while (size <= n) size <<= 1;
        size <<= 1;
        table = new T[](size);
        fill(table, e);
        offset = size / 2;
    }

    void assign(int pos, T val) {
        pos += offset;
        table[pos] = val;
        while (pos > 1) {
            pos /= 2;
            table[pos] = op(table[pos*2], table[pos*2+1]);
        }
    }

    void add(int pos, T val) {
        pos += offset;
        table[pos] += val;
        while (pos > 1) {
            pos /= 2;
            table[pos] = op(table[pos*2], table[pos*2+1]);
        }
    }

    T query(int l, int r) {
        return query(l, r, 1, 0, offset-1);
    }

    T query(int l, int r, int i, int a, int b) {
        if (b < l || r < a) {
            return e;
        } else if (l <= a && b <= r) {
            return table[i];
        } else {
            return op(query(l, r, i*2, a, (a+b)/2), query(l, r, i*2+1, (a+b)/2+1, b));
        }
    }
}