#include<bits/stdc++.h>
//#include <atcoder/all>
#pragma GCC target("avx2")
#pragma GCC optimize("O3")
#pragma GCC optimize("unroll-loops")

#define rep(i,n)for(int i=0;(i)<(int)(n);i++)
#define REP(i,a,b)for(int i=(int)(a);(i)<=(int)(b);i++)
#define ALL(a)  (a).begin(),(a).end()
#define pb push_back
#define fi first
#define se second
#define sz(x) ((int)x.size())
 
using namespace std;
//using namespace atcoder;
using ld = long double;
using ll = long long;
using P = pair<ll, ll>;
 
template<typename T> bool chmin(T& a, const T& b) { if(a >= b){ a = b; return 1;} return 0; }
template<typename T> bool chmax(T& a, const T& b) { if(a <= b){ a = b; return 1;} return 0; }


const ll MOD = 998244353;
const ll INF = 1e9;

//BIT
template <typename T>
struct BIT{
    int n;  //配列の要素数
    vector<T> bit;  //データの格納先
    BIT(int n_) : n(n_ + 1), bit(n, 0){}

    void add(int i, T x){
        for(int idx = i; idx < n; idx += (idx & -idx)){
            bit[idx] += x;
        }
    }

    T sum(int i){
        T s(0);
        for(int idx = i; idx > 0; idx -= (idx & -idx)){
            s += bit[idx];
        }
        return s;
    }

    //sum(a_i) >= w となるような最小のxを求める
    int lower_bound(T w) { // a_1 + a_2 + ... + a_x >= w となるような最小の x を求める(ただし a_i >= 0)
    if (w <= 0) return 0;
    else {
        int x = 0, r = 1;
        while (r < n) r = r << 1;
            for (int len = r; len > 0; len = len >> 1) { // 長さlenは1段下るごとに半分に
                if (x + len < n && bit[x + len] < w) { // 採用するとき
                    w -= bit[x + len];
                    x += len;
                }
            }
            return x + 1;
        }
    }
    

    T num(int i){
        T res = sum(i);
        if(i != 1)res -= sum(i - 1);
        return res;
    }
};
vector<vector<int>> G;
vector<int> eul, dep;
void dfs(int v, int p){
    eul.pb(v);
    for(auto nv : G[v]){
        if(nv == p)continue;
        dep[nv] = dep[v] + 1;
        dfs(nv, v);
    }
    eul.pb(v);
}
int main(){
    int n;
    cin >> n;
    G.resize(n);
    dep.resize(n);
    vector<int> p(n - 1);
    rep(i, n - 1)cin >> p[i];
    rep(i, n - 1){
        p[i]--;
        G[i + 1].pb(p[i]);
        G[p[i]].pb(i + 1);
    }
    int q;
    cin >> q;
    vector<int> U(q), D(q);
    rep(i, q)cin >> U[i] >> D[i];
    //Dごとに管理する
    vector<vector<P>> qry(n + 1);
    rep(i, q){
        U[i]--;
        qry[D[i]].pb(P(U[i], i));
    }
    dfs(0, -1);
    //dep[v] -> v
    vector<vector<int>> rdep(n + 1);
    rep(i, n){
        rdep[dep[i]].pb(i);
    }
    //vを根とする部分木に対応する区間を持つ
    vector<int> L(n, -1), R(n);
    rep(i, sz(eul)){
        if(L[eul[i]] == -1)L[eul[i]] = i;
        R[eul[i]] = i;
    }
    BIT<int> bit(sz(eul));
    vector<int> res(q);
    REP(i, 0, n){
        //bitに深さiの点を加える
        for(auto v : rdep[i]){
            bit.add(L[v] + 1, 1);
        }
        //クエリ処理
        for(auto qi : qry[i]){
            auto [ui, id] = qi;
            res[id] = bit.sum(R[ui] + 1);
            if(L[ui] > 0)res[id] -= bit.sum(L[ui]);
        }
        //足した分引く
        for(auto v : rdep[i]){
            bit.add(L[v] + 1, -1);
        }
    }
    for(auto ri : res)cout << ri << endl;
}
#include <bits/stdc++.h>
#define F first
#define S second
#define all(x) x.begin(),x.end()
#define endl '\n'

using namespace std;

using ll = long long;
using pii = pair<int, int>;
const int INF = 0x3f3f3f3f;
const ll INFLL = 0x3f3f3f3f3f3f3f3fLL;
const int MOD = 1000000007;
const int dx[] = { 0, 0, -1, 1, 1, -1,  1, -1};
const int dy[] = {-1, 1,  0, 0, 1, -1, -1,  1};

void merge(map<int, int> &from, map<int, int> &to){
  if(from.size() > to.size())
    swap(from, to);
  for(auto &[a, b]: from)
    to[a] += b;
  from.clear();
}
const int MAXN = 200010;
int ans[MAXN];
vector<int> adj[MAXN];
vector<pii> queries[MAXN];

void dfs(int u, int dt, map<int, int> &mp){
  for(int to: adj[u]){
    map<int, int> aux;
    dfs(to, dt + 1, aux);
    merge(aux, mp);
  }
  mp[dt]++;
  for(auto [d, id]: queries[u])
    ans[id] = mp[d];
  
}

int main() {
  ios_base::sync_with_stdio(false); cin.tie(NULL);

  int n;
  cin >> n;
  for(int i=2; i<=n; i++){
    int x;
    cin >> x;
    adj[x].push_back(i);
  }
  int q;
  cin >> q;
  for(int i=0; i<q; i++){
    int u, d;
    cin >> u >> d;
    queries[u].emplace_back(d, i);
  }
  map<int, int> mp;
  dfs(1, 0, mp);
  for(int i=0; i<q; i++)
    cout << ans[i] << endl;
  
  return 0;
}
