Problem: Alice had a permutation p_1, p_2, …, p_n. Unfortunately, the permutation looked very boring, so she decided to change it and choose some non-overlapping subranges of this permutation and reverse them. The cost of reversing a single subrange [l, r] (elements from position l to position r, inclusive) is equal to r - l, and the cost of the operation is the sum of costs of reversing individual subranges. Alice had an integer c in mind, so she only considered operations that cost no more than c.

Then she got really bored, and decided to write down all the permutations that she could possibly obtain by performing exactly one operation on the initial permutation. Of course, Alice is very smart, so she wrote down each obtainable permutation exactly once (no matter in how many ways it can be obtained), and of course the list was sorted lexicographically.

Now Bob would like to ask Alice some questions about her list. Each question is in the following form: what is the i-th number in the j-th permutation that Alice wrote down? Since Alice is too bored to answer these questions, she asked you to help her out.

Input

The first line contains a single integer t (1 ≤ t ≤ 30) — the number of test cases.

The first line of each test case contains three integers n, c, q (1 ≤ n ≤ 3 ⋅ 10^4, 1 ≤ c ≤ 4, 1 ≤ q ≤ 3 ⋅ 10^5) — the length of the permutation, the maximum cost of the operation, and the number of queries.

The next line of each test case contains n integers p_1, p_2, ..., p_n (1 ≤ p_i ≤ n, p_i ≠ p_j if i ≠ j), describing the initial permutation.

The following q lines describe the queries. Each of them contains two integers i and j (1 ≤ i ≤ n, 1 ≤ j ≤ 10^{18}), denoting parameters of this query.

It is guaranteed that the sum of values n over all test cases does not exceed 3 ⋅ 10^5, and the sum of values q over all test cases does not exceed 3 ⋅ 10^5.

Output

For each query output the answer for this query, or -1 if j-th permutation does not exist in her list.

Examples

Input


2
3 1 9
1 2 3
1 1
2 1
3 1
1 2
2 2
3 2
1 3
2 3
3 3
6 4 4
6 5 4 3 1 2
1 1
3 14
1 59
2 6


Output


1
2
3
1
3
2
2
1
3
1
4
-1
5


Input


1
12 4 2
1 2 3 4 5 6 7 8 9 10 11 12
2 20
2 21


Output


2
2

Note

In the first test case, Alice wrote down the following permutations: [1, 2, 3], [1, 3, 2], [2, 1, 3].

Note that, for a permutation [3, 2, 1] Alice would have to reverse the whole array, and it would cost her 2, which is greater than the specified value c=1. The other two permutations can not be obtained by performing exactly one operation described in the problem statement.

Solution (in CPP):

Solution:
// Main correct solution + fast input (IgorI)

#include <bits/stdc++.h>

using namespace std;

typedef long long ll;

template <class T = int> inline T readInt();
template <class T = int64_t> inline T readLong();

struct Segment{
    int rL, rR;
    long long len, plen;
};

struct Ask{
    long long j;
    int i, id;
};

const long long INFLL = 1e18 + 2222;
const int Q = 300000 + 1;
const int N = 30000 + 1;
const int C = 5;

ll ways[N][C];

ll cnt(int len, int coins)
{
    ll ans = 0;
    if (0 <= coins && 0 <= len) ans += 1;
    if (1 <= coins && 1 <= len) ans += len - 1;
    if (2 <= coins && 2 <= len) ans += 1ll * (len - 1) * (len - 2) / 2;
    if (3 <= coins && 3 <= len) ans += 1ll * (len - 1) * (len - 2) * (len - 3) / 6;
    if (4 <= coins && 4 <= len) ans += 1ll * (len - 1) * (len - 2) * (len - 3) * (len - 4) / 24;
    return ans;
}

int answer[Q];
vector<Ask> asks[C];
pair<int, int> le[C];
int lesz;
pair<int, int> ri[C];
int risz;

void solve()
{
    int n = readInt(), c = readInt(), q = readInt();

    vector<int> p(n);
    for (int i = 0; i < n; i++)
        p[i] = readInt() - 1;

    vector<deque<Segment> > s(c + 1);

    for (int coins = 0; coins <= c; coins++)
    {
        s[coins].push_back({n, n, 1});
        for (int i = n - 2; i >= 0; i--)
        {
            int me = p[i];
            lesz = 0, risz = 0;
            for (int j = i + 1; j <= i + coins && j < n; j++)
            {
                if (p[j] < me)
                {
                    le[lesz++] = {p[j], j};
                }
                else
                {
                    ri[risz++] = {p[j], j};
                }
            }
            sort(le, le + lesz);
            reverse(le, le + lesz);
            sort(ri, ri + risz);
            for (int j = 0; j < lesz; j++)
            {
                s[coins].push_front({i, le[j].second, ways[n - 1 - le[j].second][coins - le[j].second + i]});
            }
            for (int j = 0; j < risz; j++)
            {
                s[coins].push_back({i, ri[j].second, ways[n - 1 - ri[j].second][coins - ri[j].second + i]});
            }
        }
        for (int i = 0; i < s[coins].size(); i++)
        {
            s[coins][i].plen = s[coins][i].len + (i ? s[coins][i - 1].plen : 0);
        }
    }
    vector<vector<long long> > go(c + 1, vector<long long>(n + 1, INFLL));
    for (int coins = 0; coins <= c; coins++)
    {
        for (int j = (int)s[coins].size() - 1; j >= 0; j--)
        {
            go[coins][s[coins][j].rL] = min(go[coins][s[coins][j].rL], s[coins][j].plen - s[coins][j].len);
        }
    }
    for (int coins = 0; coins <= c; coins++)
    {
        for (int j = n - 1; j >= 0; j--)
        {
            go[coins][j] = min(go[coins][j], go[coins][j + 1]);
        }
    }

    for (int ii = 0; ii < q; ii++)
    {
        answer[ii] = -2;
        int i = readInt() - 1;
        long long j = readLong() - 1;
        if (j >= cnt(n, c))
        {
            answer[ii] = -1;
            continue;
        }
        asks[c].push_back({j, i, ii});
    }
    for (int level = c; level >= 0; level--)
    {
        sort(asks[level].begin(), asks[level].end(), [&](Ask A, Ask B){
             return A.j < B.j;
             });
        int pnt = 0;
        for (auto e : asks[level])
        {
            while (pnt + 1 < s[level].size() && s[level][pnt].plen <= e.j)
                pnt++;
            int L = s[level][pnt].rL;
            int R = s[level][pnt].rR;
            if (e.i <= R)
            {
                if (L <= e.i)
                    answer[e.id] = p[L + R - e.i] + 1;
                else
                    answer[e.id] = p[e.i] + 1;
            }
            else
            {
                int NL = level - (R - L);
                asks[NL].push_back({e.j - s[level][pnt].plen + s[level][pnt].len + go[NL][R + 1], e.i, e.id});
            }
        }
        vector<Ask> z;
        swap(asks[level], z);
    }
    for (int i = 0; i < q; i++)
    {
        printf("%d\n", answer[i]);
    }
    return;
}

int main()
{
    ios_base::sync_with_stdio(false);
    cin.tie(0);
    cout.tie(0);

    for (int i = 0; i < N; i++)
    {
        for (int j = 0; j < C; j++)
        {
            ways[i][j] = cnt(i, j);
        }
    }

    int t = readInt();
    while (t--)
    {
        solve();
    }
}

static const int buf_size = 4096;

static char buf[buf_size];
static int len = 0, pos = 0;

inline bool isEof() {
    if (pos == len) {
        pos = 0, len = fread(buf, 1, buf_size, stdin);
        if (pos == len)
        return 1;
    }
    return 0;
}

inline int getChar() {
    return isEof() ? -1 : buf[pos++];
}

inline int peekChar() {
    return isEof() ? -1 : buf[pos];
}

inline int readChar() {
    int c = getChar();
    while (c != -1 && c <= 32)
        c = getChar();
    return c;
}

template <class T>
inline T readInt() {
    int c = readChar();
    T x = 0;
    while ('0' <= c && c <= '9')
        x = x * 10 + c - '0', c = getChar();
    return x;
}

template <class T>
inline T readLong() {
    int c = readChar();
    T x = 0;
    while ('0' <= c && c <= '9')
        x = x * 10 + c - '0', c = getChar();
    return x;
}