#include <cstdio>
#include <vector>
using namespace std;

#define NZ 250004
#define MZ 300004

struct TP{
    int nr, sol;
};

int N, M, stk[NZ], Qry[MZ];
bool root[NZ], B[NZ];
vector <int> G[NZ];
vector <TP> Q[NZ];

void DFS(int t)
{
    vector <TP> :: iterator jt;
    vector <int> :: iterator it;

    stk[++stk[0]] = t;

    for (jt = Q[t].begin(); jt != Q[t].end(); ++jt)
        if (stk[0] <= (*jt).nr)
            Qry[(*jt).sol] = 0;
        else
            Qry[(*jt).sol] = stk[stk[0]-(*jt).nr];
    B[t] = 1;
    for (it = G[t].begin(); it != G[t].end(); ++it)
        if (B[*it] == 0)
            DFS(*it);

    --stk[0];
};

int main()
{
    freopen ("stramosi.in", "r", stdin);
    freopen ("stramosi.out", "w", stdout);
    scanf ("%d%d", &N, &M);
    for (int i = 1, a; i <= N; ++i)
    {
        scanf("%d", &a);
        if (a == 0) root[i] = 1;
        else G[a].push_back(i);
    }
    TP ct;
    for (int i = 1, nod; i <= M; ++i)
    {
        scanf("%d%d", &nod, &ct.nr);
        ct.sol = i;
        Q[nod].push_back(ct);
    }
    for (int i = 1; i <= N; ++i)
        if (root[i])
            DFS(i);
    for (int i = 1; i <= M; ++i)
        printf("%i\n", Qry[i]);
}