rt

#include<bits/stdc++.h>
using namespace std;
int n,m,s;
vector<int>g[500010];
int step[500010];
int mx[500010];
int fa[500010][110];
void dfs(int x,int f){
	mx[x]=max(x,f);
	fa[x][0]=f;
	step[x]=step[f]+1;
	for(int i=0;i<g[x].size();i++){
		if(g[x][i]!=f){
			dfs(g[x][i],x);
		}
	}
}
int lca(int x,int y){
	if(step[x]>step[y]) swap(x,y);
	int k=0;
	while(1<<(k+1)<=step[y]) k++;
	for(int i=k;i>=0;i--){
		if(step[x]<=step[fa[y][i]]){
			y=fa[y][i];
		}
	}
	if(x==y) return x;
	for(int i=k;i>=0;i--){
		if(fa[x][i]!=fa[y][i]){
			x=fa[x][i];
			y=fa[y][i];
		}
	}
	return fa[x][0];
}
int main(){
	scanf("%d",&n);
	for(int i=2;i<=n;i++){
		int x;
		scanf("%d",&x);
		g[x+1].push_back(i);
	}
	dfs(1,0);
	for(int i=1;i<100;i++){
		for(int j=1;j<=n;j++){
			fa[j][i]=fa[fa[j][i-1]][i-1];
		}
	}
	scanf("%d",&m);
	vector<int>v;
	while(m--){
		int len;
		scanf("%d",&len);
		v.clear();
		for(int i=1;i<=len;i++){
			int x;
			scanf("%d",&x);
			v.push_back(x+1);
		}
		int LCA=lca(v[0],v[1]);
		for(int i=2;i<len;i++){
			LCA=lca(LCA,v[i]);
		}
		printf("%d\n",mx[LCA]-1);
	}
	return 0;
}