#include<bits/stdc++.h>
//#define int long long
using namespace std;
inline int read(){
	int x=0,f=1;char ch=getchar();
	while(ch<'0'||ch>'9'){if(ch=='-')f=-f;ch=getchar();}
	while(ch>='0'&&ch<='9'){x=x*10+ch-'0';ch=getchar();}
	return x*f;
}
int buf[30];
inline void print(int x,char ch=' '){
	if(x<0) putchar('-'),x=-x;
	int tot=0;
	do{
		buf[++tot]=x%10;
		x/=10;
	}while(x);
	for(int i=tot;i;i--) putchar(buf[i]+'0');
	putchar(ch);
}
const int MAXN=1e5+5;
int n,m,root;
vector<int> e[MAXN];

struct node{
	int siz,son,dep,dist;
}a[MAXN];
void dfs1(int x,int dep){
	a[x].siz=1,a[x].dep=dep;
	for(int to:e[x]){
		dfs1(to,dep+1);
		a[x].siz+=a[to].siz;
		if(a[to].dist>a[a[x].son].dist)
			a[x].son=to;
	}
	a[x].dist=a[a[x].son].dist+1;
}

int *f[MAXN],g[MAXN],*now=g;
set<int> s[MAXN];
int num;
struct Node{
	int l,r,x;
	Node(int a=0,int b=0,int c=0){l=a,r=b,x=c;}
}b[MAXN*40];
void merge(int x,int y,int limit){
	if(s[x].size()<s[y].size())
		swap(s[x],s[y]);
	for(int z:s[y]){
		set<int>::iterator it=s[x].lower_bound(z);
		if(it!=s[x].end())
			b[++num]=Node(z,*it,limit);
		if(it!=s[x].begin()){
			it--;
			b[++num]=Node(*it,z,limit);
		}
	}
	for(int z:s[y]) s[x].insert(z);
}
void dfs2(int x){
	f[x][0]=f[x]-g;
	s[f[x][0]].insert(x);
	if(!a[x].son) return ;
	f[a[x].son]=f[x]+1;
	dfs2(a[x].son);
	vector<int> temp;
	for(int to:e[x]){
		if(to==a[x].son) continue;
		f[to]=now,now+=a[to].dist;
		dfs2(to);
		for(int i=0;i<a[to].dist;i++)
			merge(f[x][i+1],f[to][i],i+1);
	}
}

struct segment_tree{
	struct sgt{
		int ls,rs,sum;
	}t[MAXN*20];
	int rot[MAXN],tot;
	void pushup(int i){
		t[i].sum=t[t[i].ls].sum+t[t[i].rs].sum;
	}
	void update(int &i,int rot,int l,int r,int k){
		i=++tot;
		if(l==r)
			return (void)(t[i].sum=t[rot].sum+1);
		int mid=(l+r)>>1;
		t[i]=t[rot];
		if(mid>=k)
			update(t[i].ls,t[rot].ls,l,mid,k);
		else
			update(t[i].rs,t[rot].rs,mid+1,r,k);
		pushup(i); 
	}
	int query(int rot1,int rot2,int l,int r,int L,int R){
		if(L<=l&&r<=R)
			return t[rot2].sum-t[rot1].sum;
		int mid=(l+r)>>1;
		if(R<=mid)
			return query(t[rot1].ls,t[rot2].ls,l,mid,L,R);
		if(mid<L)
			return query(t[rot1].rs,t[rot2].rs,mid+1,r,L,R);
		return query(t[rot1].ls,t[rot2].ls,l,mid,L,mid)+
		       query(t[rot1].rs,t[rot2].rs,mid+1,r,mid+1,R);
	}
}sgt;
signed main(){
	n=read(),m=read();
	for(int i=1;i<=n;i++){
		int x=read();
		if(x==0) root=i;
		else e[x].push_back(i);
	}
	
	dfs1(root,1);
	f[root]=now,now+=a[root].dist;
	dfs2(root);
	
	for(int i=1;i<=n;i++)
		sgt.update(sgt.rot[i],sgt.rot[i-1],1,n,a[i].dep);
	
	while(m--){
		int l=read(),r=read(),x=read();
		if(x==n){
			print(0,'\n');
			continue;
		}
		int ans=sgt.query(sgt.rot[l-1],sgt.rot[r],1,n,x+1,n);
		for(int i=l;i<=r;i++){
			if(a[i].dep>x){
				bool flag=0;
				for(int j=1;j<=num;j++){
					if(l<=b[j].l&&b[j].r==i&&b[j].x<=x){
						flag=1;
						break;
					}
				}
				ans-=flag;
			}
		}
		print(ans,'\n');
	}
	return 0;
}