#include<bits/stdc++.h>
#define int long long
const int N=1000005;
using namespace std;


int w[N],val[N],id[N];

#define _to e[i].to
#define fore(k) for(int i=hd[k];i;i=e[i].nx)
struct edge{
    int to,nx;
}e[N];int hd[N],S;
void add(int fr,int to){
    e[++S]=(edge){to,hd[fr]},hd[fr]=S;
}

int n;
int sz[N],dp[N];
void dfs(int k,int fa){
    dp[k]=dp[fa]+1;
    sz[k]=1;
    fore(k)if(_to!=fa){
        dfs(_to,k);
        sz[k]+=sz[_to];
    }
    val[k]=sz[k]-dp[k]-w[k];
}

int col[N],sc[N];
int res=0;

void df5(int k,int fa){
    if(col[k])res-=w[k],sc[k]=1;
    fore(k)if(_to!=fa){
        df5(_to,k);
        sc[k]+=sc[_to];
    } 
    if(col[k])res+=sz[k]-sc[k];
    else res-=sc[k];
}

void solve(){
    cin>>n;
    for(int i=1;i<=n;i++){
        cin>>w[i];
        id[i]=i;
    }
    for(int i=2;i<=n;i++){
        int x;cin>>x;
        add(i,x);
        add(x,i);
    }
    dfs(1,0);
    sort(id+1,id+1+n,[](int x,int y){return val[x]>val[y];});
    for(int i=1;i<=n;i++){
        col[id[i]]=i&1;
    } 
    df5(1,0);
    cout<<res<<endl;
}

main(){
    ios::sync_with_stdio(0);
    int _T=1;//cin>>_T;
    while(_T--)solve();
}