#include<bits/stdc++.h>
using namespace std;
typedef long long ll;
const int MAXN = 1e6+10,MA = 20;
int n,q,v[MAXN]; vector<int> e[MAXN];

int pre[MAXN],buc[MAXN],dep[MAXN],to[MAXN][MA],cnt[MAXN][MA][2],dfn[MAXN],dtot;
ll f[MAXN][MA];

void dfs(int u){
    pre[u] = buc[dep[u]],buc[dep[u]] = u; dfn[++dtot] = u;
    to[u][0] = to[pre[u]][0];
    f[u][0] = f[pre[u]][0] + v[u];

    for(int i=0;i<MA;i++)cnt[u][i][v[u]>>i&1]++;
    for(auto v : e[u]){
        dep[v] = dep[u]+1;
        dfs(v);
        to[u][0] = v;
        for(int i=0;i<MA;i++)for(int j=0;j<2;j++)cnt[u][i][j] += cnt[v][i][j];
    }
}

ll Q(int x,int k){
    if(!x)return 0;
    int p = x; for(int j=MA-1;j>=0;j--)if(k>>j&1)p = to[p][j];
    ll ans = 0;
    int q = x;
    for(int j=MA-1;j>=0;j--)if(k>>j&1){
        ans += f[q][j]; q = to[q][j];
        int c[2] = {cnt[q][j][0]-cnt[p][j][0],cnt[q][j][1]-cnt[p][j][1]};
        ans += 1ll * (c[0]-c[1]) * (1<<j);
    }
    return ans;
}

int main(){
    ios::sync_with_stdio(false); cin.tie(0);

    cin>>n;
    for(int i=1;i<=n;i++)cin>>v[i];
    for(int i=2,p;i<=n;i++)cin>>p,e[p].push_back(i);
    dfs(1);

    for(int i=n;i>=1;i--)for(int j=1;j<MA;j++)to[i][j] = to[to[i][j-1]][j-1];
    for(int i=1;i<=n;i++){
        int u = dfn[i];
        for(int j=0;j<MA;j++)for(int k=0;k<2;k++)cnt[u][j][k] += cnt[pre[u]][j][k];
    }
    for(int i=n;i>=1;i--){
        for(int j=1;j<MA;j++){
            f[i][j] = f[i][j-1] + f[to[i][j-1]][j-1];
            int p = to[i][j-1],q = to[i][j];
            int c[2] = {cnt[p][j-1][0]-cnt[q][j-1][0],cnt[p][j-1][1]-cnt[q][j-1][1]};
            f[i][j] += 1ll * (c[0]-c[1]) * (1<<(j-1));
        }
    }

    cin>>q;
    while(q--){
        int x,k; cin>>x>>k; k++;
        ll ans = Q(x,k) - Q(pre[x],k);
        cout<<ans<<"\n";
    }

    return 0;
}