#include <cstdio>
#include <cstring>
 
using namespace std;
 
#define N 100001
 
#define dim 8192
char ax[dim];
int pz;
 
inline void cit(int &x) {
    x = 0;
    while (ax[pz] < '0' || ax[pz] > '9')
        if (++pz == dim)
            fread(ax, 1, dim, stdin), pz = 0;
    while (ax[pz] >= '0' && ax[pz] <= '9') {
        x = x * 10 + ax[pz] - '0';
        if (++pz == dim)
            fread(ax, 1, dim, stdin), pz = 0;
    }
}
 
char bx[dim];
int bz;
 
inline void scrie(int x) {
    char s[7];
    int  ns = 0;
    if (x == 0) {
        s[ns++] = 0;
    }
    else {
        while (x) {
            s[ns++] = x % 10;
            x /= 10;
        }
        s[ns] = 0;
    }
    for (int i = ns - 1; i >= 0; --i) {
        bx[bz] = s[i] + '0';
        if (++bz == dim)
            fwrite(bx, 1, dim, stdout), bz = 0;
    }
    
    bx[bz] = ' ';
    if (++bz == dim)
        fwrite(bx, 1, dim, stdout), bz = 0;
}
 
 
int *a[N];
int len[N];

int parent[N];
 
int st[N];
int n;
 
int g[N];
int root = 0;
int nst;
 
int sol[N];
 
 
inline void dfs(int u) {
    st[++nst] = u;
 
    if (parent[u] != 0)
        sol[u] = sol[ st[ nst - parent[u] ] ] + 1;
 
    for (int it = 0; it < len[u]; ++it)
        dfs(a[u][it]);
 
    --nst;
}

 
void afisare() {
    for (int i = 1; i <= n; ++i)
        scrie(sol[i]);
    bx[bz++] = '\n';
    fwrite(bx, 1, bz, stdout);
 
}
int edges[N][2];

int main() {
 
    freopen ("cerere.in", "r", stdin);
    freopen ("cerere.out", "w", stdout);
    cit(n);
    int i;
    for (i = 1; i <= n; ++i)
        cit(parent[i]);
 
    int p, q;
 
    for (i = 1; i < n; ++i) {
        cit(p); cit(q);
        edges[i][0] = p;
        edges[i][1] = q;
        ++g[q];
        ++len[p];
    }
    
    for (i = 1; i <= n; ++i) {
        a[i] = new int[len[i]];
        len[i] = 0;
    }
    
    for (i = 1; i < n; ++i) {
        p = edges[i][0];
        q = edges[i][1];
        a[p][len[p]++] = q;
    }
    
    for (i =1 ;i <= n; ++i)
        if (!g[i])
            root = i;
 
    dfs(root);
 
    afisare();
}