#include<stdio.h>
#include<algorithm>
#include<vector>
using namespace std;
vector<int>a[100001];
int n,m,lvl[100001],eul[100001],k;


void read()
{int x;
scanf("%d%d",&n,&m);
for(int i=2;i<=n;i++)
{scanf("%d ",&x);
a[x].push_back(i);}
}

void dfs(int nod,int lv)
{vector<int>::iterator it;
eul[++k]=nod;
lvl[k]=lv;
for(it=a[nod].begin();it!=a[nod].end();it++)
	{dfs(*it,lv+1);
	eul[++k]=nod;
	lvl[k]=lv;
	
	}
}


void solve()
{int x,y,min,ok,nod;
for(int j=1;j<=m;j++)
{scanf("%d %d",&x,&y);
min=n;ok=0;
for(int i=1;i<=k&&ok!=2;i++)
{if(ok==1)
	if(lvl[i]<min){min=lvl[i];nod=eul[i];}
if(eul[i]==x)ok=1;
if(eul[i]==y)ok=2;}
printf("%d\n",nod);
}
}

int main()
{freopen("lca.in","r",stdin);
freopen("lca.out","w",stdout);
read();
dfs(1,0);
solve();
return 0;}