#include<bits/stdc++.h>
using namespace std;

typedef long long ll;
#define pb push_back
const int N=1e5+3,M=1e6+3;
int n,m,rt,tot,fa[N],sz[N],hson[N],dep[N],top[N],dwn[N];
int ans[M];
vector<int>ve[N],D[N];
vector<array<int,3>>res[N],now[N];
array<int,4>c[M*3];
void Dfs1(int x)
{
	dep[x]=dep[fa[x]]+1;
	for(int y:ve[x])
	{
		Dfs1(y);sz[x]+=sz[y];
		if(sz[hson[x]]<sz[y])hson[x]=y;
	}
}
void Dfs2(int x,int tp)
{
	top[x]=tp;
	if(hson[x])Dfs2(hson[x],tp);
	for(int y:ve[x])if(y!=hson[x])Dfs2(y,y);
	dwn[x]=hson[x]?dwn[hson[x]]:x; 
}
void Color(int id)
{
	int x=id;
	while(x)
	{
		int p=top[x];
		while(res[p].size()&&res[p].back()[0]<=dep[x])
		{
			auto [l,r,o]=res[p].back();res[p].pop_back();
			now[id].pb({dep[id]-r,dep[id]-l,o});
			if(r>dep[x])res[p].pb({dep[x]+1,r,o});
		}
		res[p].pb({dep[p],dep[x],id});x=fa[p];
	}
}
void Clear(int p){while(p)res[top[p]]={{dep[top[p]],dep[dwn[p]],0}},p=fa[top[p]];}
void Work(int d)
{
	for(int id:D[d])Color(id);
	for(int id:D[d])Clear(id);
	for(int id:D[d])for(auto [l,r,o]:now[id])
	{
		c[++tot]={id,o,r,1};
		if(l)c[++tot]={id,o,l-1,-1}; 
	}
//	cout<<"Work: "<<d<<endl;
//	for(int id:D[d])
//	{
//		cout<<"Now: "<<id<<endl;
//		for(auto [l,r,o]:now[id])cout<<l<<" "<<r<<" "<<o<<endl;
//	}
}
bool Cmp(array<int,4> A,array<int,4> B){return A[2]!=B[2]?A[2]<B[2]:A[3]>B[3];}
void Sol(int L,int R)
{
	if(L==R)return;
	int mi=(L+R)/2;Sol(L,mi);Sol(mi+1,R);
	for(int i=L;i<=mi;i++)if(c[i][3]>1)
	{
		auto [l,r,d,id]=c[i];
		for(int j=mi+1;j<=R;j++)if(c[j][3]<=1)
		{
			auto [t,lim,v,op]=c[j];
			if(lim<l&&l<=t&&t<=r)ans[id]+=op;
		}
	}
}
int main()
{
	//freopen("1.in","r",stdin);
	ios::sync_with_stdio(0),cin.tie(0),cout.tie(0);
	cin>>n>>m;
	for(int i=1;i<=n;i++)
	{
		cin>>fa[i];
		if(!fa[i])rt=i;
		else ve[fa[i]].pb(i);
	}
	Dfs1(rt);Dfs2(rt,rt);
	for(int i=1;i<=n;i++)D[dep[i]].pb(i);
	for(int i=1;i<=n;i++)if(top[i]==i)res[i].pb({dep[i],dep[dwn[i]],0}); 
	for(int d=1;d<=n;d++)if(D[d].size())Work(d);
	for(int i=1,l,r,d;i<=m;i++)cin>>l>>r>>d,c[++tot]={l,r,d,i+1};
	sort(c+1,c+tot+1,Cmp);
	//for(int i=1;i<=tot;i++)cout<<c[i][0]<<" "<<c[i][1]<<" "<<c[i][2]<<" "<<c[i][3]<<endl;
	for(int i=1;i<=tot;i++)if(c[i][3]>1)
	{
		auto [l,r,d,id]=c[i];
		for(int j=i+1;j<=tot;j++)if(c[j][3]<=1)
		{
			auto [t,lim,v,op]=c[j];
			if(lim<l&&l<=t&&t<=r)ans[id]+=op;
		}
	}
	//Sol(1,tot);
	for(int i=1;i<=m;i++)cout<<ans[i+1]<<"\n";
//	for(int t=1,l,r,d;t<=m;t++)
//	{
//		cin>>l>>r>>d;int ans=0;
//	//	if(t!=2)continue;
//		for(int i=1;i<=r;i++)
//		{
//			//cout<<"Sol: "<<i<<endl;
//			for(auto [u,v,lim]:now[i])
//			{
//				//cout<<u<<" "<<v<<" "<<lim<<endl;
//				if(lim<l&&l<=i&&u<=d&&d<=v)ans++;
//			}
//			//cout<<ans<<endl;
//		}
//		cout<<ans<<"\n";
//	}
}