#include<iostream>
#include<cstdio>
#include<vector>
using namespace std;
int n,m,ans[3000001],dep[3000001],fa[3000001],s[3000001],son[3000001],top[3000001],dfn[3000001],sum[3000005],cnt;
struct element
{
	int x,y,k,id;
}q[3000001];
vector<int> v[3000001];
struct opt
{
	int k,tag,id;
	opt(int k_,int tag_,int id_):
		k(k_),tag(tag_),id(id_){}
};
vector<opt> a[3000001];
struct ds
{
	int len[3000001],son[3000001],tmp[3000001],*id=tmp,*sum[3000001];
	vector<int> a[3000001],b[3000001];
	inline void dfs1(int k,int f)
	{
		for(int i:v[k])
		{
			if(i==f)
				continue;
			dfs1(i,k);
			if(len[i]>len[k])
			{
				len[k]=len[i];
				son[k]=i;
			}
		}
		++len[k];
	}
	inline void dfs2(int k,int f)
	{
		if(son[k])
		{
			sum[son[k]]=sum[k]+1;
			dfs2(son[k],k);
		}
		sum[k][0]+=s[k];
		for(int i:v[k])
		{
			if(i==f||i==son[k])
				continue;
			sum[i]=id;
			id+=len[i];
			dfs2(i,k);
			for(int j=0;j<len[i];++j)
				sum[k][j+1]+=sum[i][j];
		}
		for(int i:a[k])
		{
			ans[i]+=s[k];
			if(q[i].k+1<len[k])
				ans[i]-=sum[k][q[i].k+1];
			if(fa[top[k]]&&dep[fa[top[k]]]>=dep[q[i].x])
				a[fa[top[k]]].emplace_back(i);
		}
		for(int i:b[k])
		{
			ans[i]-=s[k];
			if(q[i].k<len[k])
				ans[i]+=sum[k][q[i].k];
			if(fa[top[fa[k]]]&&dep[fa[top[fa[k]]]]>=dep[q[i].x])
				b[top[fa[k]]].emplace_back(i);
		}
		a[k].clear();
		a[k].shrink_to_fit();
		b[k].clear();
		b[k].shrink_to_fit();
	}
}T;
inline void dfs1(int k,int f,int deep)
{
	dep[k]=deep;
	fa[k]=f;
	s[k]=1;
	for(int i:v[k])
	{
		if(i==f)
			continue;
		dfs1(i,k,deep+1);
		s[k]+=s[i];
		if(s[i]>s[son[k]])
			son[k]=i;
	}
}
inline void dfs2(int k,int t)
{
	top[k]=t;
	dfn[k]=++cnt;
	if(!son[k])
		return;
	dfs2(son[k],t);
	for(int i:v[k])
	{
		if(i==fa[k]||i==son[k])
			continue;
		dfs2(i,i);
	}
}
inline void update(int x,int y,int k,int id)
{
	T.a[y].emplace_back(id);
	if(x==y)
		return;
	bool flag=0;
	while(y==top[y])
	{
		if(!flag)
		{
			flag=1;
			T.b[y].emplace_back(id);
		}
		y=fa[y];
		if(y==x)
			return;
	}
	y=fa[y];
	while(top[x]^top[y])
	{
		a[y].emplace_back(k,1,id);
		y=top[y];
		while(y==top[y])
		{
			if(!flag)
			{
				flag=1;
				T.b[y].emplace_back(id);
			}
			y=fa[y];
			if(y==x)
				return;
		}
		y=fa[y];
	}
	a[y].emplace_back(k,1,id);
	if(x!=top[x])
		a[fa[x]].emplace_back(k,-1,id);
}
inline void dfs(int k,int f,int deep,int p)
{
	sum[deep]+=p*s[k];
	for(int i:v[k])
	{
		if(i==f)
			continue;
		dfs(i,k,deep+1,p);
	}
}
inline void init()
{
	ios::sync_with_stdio(0);
	cin.tie(0);
}
inline int read()
{
	int x;
	cin>>x;
	return x;
}
int main()
{
	init();
	n=read();
	for(int i=2;i<=n;++i)
	{
		int f=read();
		v[f].emplace_back(i);
		v[i].emplace_back(f);
	}
	dfs1(1,0,1);
	dfs2(1,1);
	m=read();
	for(int i=1;i<=m;++i)
	{
		q[i].x=read(),q[i].y=read(),q[i].k=read();
		update(q[i].x,q[i].y,q[i].k,q[i].id=i);
	}
	T.dfs1(1,0);
	T.sum[1]=T.id;
	T.id+=T.len[1];
	T.dfs2(1,0);
	for(int i=1;i<=n;++i)
		if(top[i]==i)
		{
			int res=0;
			for(int j=i;j;j=son[j])
			{
				++res;
				for(int k:v[j])
					if(k!=son[j]&&k!=fa[j])
					{
						res+=s[k];
						dfs(k,j,1,1);
					}
				for(auto k:a[j])
					ans[k.id]+=k.tag*(res-sum[k.k+1]);
			}
			for(int j=i;j;j=son[j])
				for(int k:v[j])
					if(k!=son[j]&&k!=fa[j])
						dfs(k,j,1,-1);
		}
	for(int i=1;i<=m;++i)
		cout<<ans[i]<<'\n';
	cout.flush();
	return 0;
}