//Author: Kevin
#include<bits/stdc++.h>
//#pragma GCC optimize("O2")
using namespace std;
#define ll long long
#define ull unsigned ll
#define pb emplace_back
#define mp make_pair
#define ALL(x) (x).begin(),(x).end()
#define rALL(x) (x).rbegin(),(x).rend()
#define srt(x) sort(ALL(x))
#define rev(x) reverse(ALL(x))
#define rsrt(x) sort(rALL(x))
#define sz(x) (int)(x.size())
#define inf 0x3f3f3f3f
#define pii pair<int,int>
#define lb(v,x) (int)(lower_bound(ALL(v),x)-v.begin())
#define ub(v,x) (int)(upper_bound(ALL(v),x)-v.begin())
#define uni(v) v.resize(unique(ALL(v))-v.begin())
#define longer __int128_t
void die(string S){puts(S.c_str());exit(0);}
int f[1001000];
ll a[1001000];
int cnt[1001000];
int n,q;
vector<array<int,3>> vec;
int fa[1001000];
inline int anc(int x)
{
	while(fa[x]!=x) x=fa[x]=fa[fa[x]];
	return x;
}
ll sum1[1001000*22],sum2[1001000*22];
int ls[1001000*22],rs[1001000*22],tot;
int update(int x,int l,int r,int p,ll v)
{
	int ret=++tot;
	ls[ret]=ls[x];
	rs[ret]=rs[x];
	sum1[ret]+=v;
	sum2[ret]++;
	if(l==r) return ret;
	int mid=(l+r)/2;
	if(p<=mid)
		ls[ret]=update(ls[x],l,mid,p,v);
	else
		rs[ret]=update(rs[x],mid+1,r,p,v);
	return ret;
}
int merge(int x,int y)
{
	if(!x||!y) return x+y;
	sum1[x]+=sum1[y];
	sum2[x]+=sum2[y];
	ls[x]=merge(ls[x],ls[y]);
	rs[x]=merge(rs[x],rs[y]);
	return x;
}
int rt[1001000];
int depth[1001000];
ll ans[1001000];
ll cur[1001000];
ll query(int x,int l,int r,int ql,int qr,ll v)
{
	if(!x) return 0;
	if(l==ql&&r==qr)
		return sum1[x]+sum2[x]*v;
	int mid=(l+r)/2;
	if(qr<=mid)
		return query(ls[x],l,mid,ql,qr,v);
	if(ql>mid)
		return query(rs[x],mid+1,r,ql,qr,v);
	return query(ls[x],l,mid,ql,mid,v)+query(rs[x],mid+1,r,mid+1,qr,v);
}
int dfn[1001000],out[1001000],dn;
vector<int> G[1001000];
void dfs(int u)
{
	dfn[u]=++dn;
	for(auto v:G[u])
		dfs(v);
	out[u]=dn;
}
int main()
{
	ios_base::sync_with_stdio(false);
	cin.tie(0);
	cout.tie(0);
	cin>>n>>q;
	for(int i=2;i<=n;i++)
	{
		cin>>f[i];
		G[f[i]].pb(i);
	}
	dfs(1);
	for(int i=1;i<=n;i++)
	{
		fa[i]=i;
		cin>>a[i];
		cnt[i]=1;
		a[i]-=1e8;
	}
	for(int i=1;i<=n;i++)
		depth[i]=depth[f[i]]+1;
	for(int i=1;i<=n;i++)
		rt[i]=update(rt[i],1,n,dfn[i],a[i]);
	for(int i=1;i<=q;i++)
	{
		int u;
		int v;
		cin>>u>>v;
		vec.push_back(array<int,3>{v+(int)1e8,u,i});
	}
	srt(vec);
	priority_queue<pair<ll,int>,vector<pair<ll,int>>,greater<pair<ll,int>>> pq;
	for(int i=2;i<=n;i++)
		pq.emplace(cur[i]=-a[i],i);
	for(auto arr:vec)
	{
		while(!pq.empty()&&pq.top().first<=arr[0])
		{
			int x=pq.top().second;
			ll rval=pq.top().first;
			pq.pop();
			if(fa[x]!=x||rval!=cur[x]) continue;
			int fat=anc(f[x]);
			fa[x]=fat;
			cnt[fat]+=cnt[x];
			a[fat]+=a[x];
			rt[fat]=merge(rt[fat],rt[x]);
			if(fat>1)
				pq.emplace(cur[fat]=(-a[fat]+cnt[fat]-1)/cnt[fat],fat);
		}
		int u=arr[1];
		int u2=anc(u);
		ans[arr[2]]=query(rt[u2],1,n,dfn[u],out[u],arr[0]);
	}
	for(int i=1;i<=q;i++)
		cout<<ans[i]<<'\n';
	return 0;
}