#include<cstdio>
#include<algorithm>
#include<cstring>
const int N=200050;
struct node
{
    int to,next;
}e[N];
int first[N],dep[N],visit[N];
int fa[N][30];
int cnt=0;
void insert(int u,int v)
{
    e[++cnt].to=v;e[cnt].next=first[u];first[u]=cnt;
    e[++cnt].to=u;e[cnt].next=first[v];first[v]=cnt;
}
void dfs(int x)
{
    visit[x]=1;
    for(int i=1;(1<<i)<=dep[x];i++)
        fa[x][i]=fa[fa[x][i-1]][i-1];
    for(int k=first[x];k;k=e[k].next)    
    if(!visit[e[k].to])
    {
        fa[e[k].to][0]=x;
        dep[e[k].to]=dep[x]+1;
        dfs(e[k].to);
    }
}
int getlca(int x,int y)
{
    if(dep[x]<dep[y])    std::swap(x,y);
    int t=dep[x]-dep[y];
    for(int i=0;(1<<i)<=t;i++)
    if((1<<i)&t)    x=fa[x][i];

    for(int i=25;i>=0;i--)
    if((1<<i)<=dep[x]&&fa[x][i]!=fa[y][i])
    x=fa[x][i],y=fa[y][i];
    if(x==y)    return x;
    return fa[x][0];
}
int main()
{
    int n;    
    scanf("%d",&n);
    int k;
    for(int i=2;i<=n;i++)        scanf("%d",&k),insert(i,k);
    dfs(1);
    int m;
    scanf("%d",&m);
    int p,q;
    for(int i=1;i<=m;i++)    scanf("%d %d",&p,&q),printf("%d\n",getlca(p,q));
    return 0;    
}