#include <stdio.h>
#include <stdlib.h>
#define INF "stramosi.in"
#define OUF "stramosi.out"
#define NMAX 262144
int st[NMAX],sol[300001];
struct nod
{
	int c;
	nod *next;
};
struct nod2
{
	int c,poz;
	nod2 *next;
}*pr;
struct head
{
	nod *p,*q;
}la[NMAX];
struct head2
{
	nod2 *p,*q;
}lk[NMAX];

void dfs(nod *p,int k)
{
	while(p!=NULL)
	{
		st[k]=p->c;
		pr=lk[p->c].p;
		//printf("%d\n",st[k]);
		while(pr!=NULL)
		{
		//	printf("%d ",pr->c);
			if(k>=pr->c) sol[pr->poz]=st[k-(pr->c)];//warning
		          else sol[pr->poz]=0;
			pr=pr->next;
		}
		//printf("\n");
		dfs(la[p->c].p,k+1);
		p=p->next;
	}
}
void tipar(nod2 *p)
{
	while(p!=NULL) {printf("%d_%d ",p->c,p->poz);p=p->next;}
	printf("\n");
}
int main()
{
	int i,n,m,x,k;
	nod *op;
	nod2 *po;
	FILE *in,*out;
	in=fopen(INF,"r");
	out=fopen(OUF,"w");
	fscanf(in,"%d %d",&n,&m);
	for(i=1;i<=n;i++) {la[i].p=la[i].q=NULL;lk[i].p=lk[i].q=NULL;}
	for(i=1;i<=n;i++)
	{
		op=new nod;
		op->next=NULL;fscanf(in,"%d",&x);
		op->c=i;
		if(la[x].p==NULL){la[x].p=la[x].q=op;}
		else {la[x].q->next=op;la[x].q=op;}
	}
	for(i=1;i<=m;i++)
	{
           fscanf(in,"%d %d",&x,&k);
	   po=new nod2;
	   po->next=NULL;po->c=k;po->poz=i;
	   if(lk[x].p==NULL){lk[x].p=lk[x].q=po;}
	   else {lk[x].q->next=po;lk[x].q=po;};
	}
	dfs(la[0].p,1);
//	for(i=0;i<=n;i++) tipar(lk[i].p);
	for(i=1;i<=m;i++) fprintf(out,"%d\n",sol[i]);
	fclose(in);fclose(out);
	return 0;
}