#include<iostream>
#include<string>
#include<vector>
#include<algorithm>
#include<numeric>
#include<cmath>
#include<utility>
#include<tuple>
#include<cstdint>
#include<cstdio>
#include<iomanip>
#include<map>
#include<queue>
#include<set>
#include<stack>
#include<deque>
#include<unordered_map>
#include<unordered_set>
#include<bitset>
#include<cctype>
#include<chrono>
#include<random>
#include<cassert>
#include<cstddef>
#include<iterator>
#include<string_view>
#include<type_traits>

#ifdef LOCAL
#  include "debug_print.hpp"
#  define debug(...) debug_print::multi_print(#__VA_ARGS__, __VA_ARGS__)
#else
#  define debug(...) (static_cast<void>(0))
#endif

using namespace std;
#define rep(i,n) for(int i=0; i<(n); i++)
#define rrep(i,n) for(int i=(n)-1; i>=0; i--)
#define FOR(i,a,b) for(int i=(a); i<(b); i++)
#define RFOR(i,a,b) for(int i=(b-1); i>=(a); i--)
#define ALL(v) v.begin(), v.end()
#define RALL(v) v.rbegin(), v.rend()
#define UNIQUE(v) v.erase( unique(v.begin(), v.end()), v.end() );
#define pb push_back
using ll = long long;
using D = double;
using LD = long double;
using P = pair<int, int>;
template<typename T> using PQ = priority_queue<T,vector<T>>;
template<typename T> using minPQ = priority_queue<T, vector<T>, greater<T>>;
template<class T>bool chmax(T &a, const T &b) { if (a<b) { a=b; return 1; } return 0; }
template<class T>bool chmin(T &a, const T &b) { if (b<a) { a=b; return 1; } return 0; }
void yesno(bool flag) {cout << (flag?"Yes":"No") << "\n";}

template<typename T, typename U>
ostream &operator<<(ostream &os, const pair<T, U> &p) {
    os << p.first << " " << p.second;
    return os;
}
template<typename T, typename U>
istream &operator>>(istream &is, pair<T, U> &p) {
    is >> p.first >> p.second;
    return is;
}

template<typename T>
ostream &operator<<(ostream &os, const vector<T> &v) {
    int s = (int)v.size();
    for (int i = 0; i < s; i++) os << (i ? " " : "") << v[i];
    return os;
}
template<typename T>
istream &operator>>(istream &is, vector<T> &v) {
    for (auto &x : v) is >> x;
    return is;
}
void in() {}
template<typename T, class... U>
void in(T &t, U &...u) {
    cin >> t;
    in(u...);
}
void out() { cout << "\n"; }
template<typename T, class... U, char sep = ' '>
void out(const T &t, const U &...u) {
    cout << t;
    if (sizeof...(u)) cout << sep;
    out(u...);
}
void outr() {}
template<typename T, class... U, char sep = ' '>
void outr(const T &t, const U &...u) {
    cout << t;
    outr(u...);
}

int main(){
    ios_base::sync_with_stdio(false);
    cin.tie(nullptr);
    int n; in(n);
    vector<ll> a(n), b(n), c(n); in(a,b,c);
    rep(i,n) c[i]--;

    vector<int> seen(n,false);
    vector<int> loop(n,-1);
    vector<int> ord;
    vector<int> ind(n);
    vector<int> par(n);
    rep(i,n) par[i] = i;
    vector<ll> sa_lp(n);
    vector<ll> sb_lp(n);

    rep(i,n) ind[c[i]]++;

    rep(i,n){
        if(seen[i]) continue;

        int now = i;
        do{
            seen[now] = true;
            now = c[now];
        }while(!seen[now]);

        int piv = now;
        while(loop[now] == -1){
            sa_lp[piv] += a[now];
            sb_lp[piv] += b[now];
            par[now] = piv;
            loop[now] = 1;
            now = c[now];
        }

        now = i;
        while(loop[now] == -1){
            loop[now] = 0;
            now = c[now];
        }
    }
    rep(i,n) if(loop[i] == 0) sa_lp[i] = a[i], sb_lp[i] = b[i];

    queue<int> q;
    rep(i,n) if(ind[i] == 0) q.push(i);

    while(q.size()){
        int x = q.front(); q.pop();
        ord.pb(x);
        int y = c[x];
        if(loop[y]){
            ord.pb(par[y]);
        }
        else{
            ind[y]--;
            if(ind[y] == 0) q.push(y);
        }
    }

    // out(loop);
    // out(ord);

    ll ok = 0, ng = 1e15;
    vector<ll> f(n);
    while(ng-ok > 1){
        ll mid = (ok+ng)/2;
        f = sa_lp;
        int chk = 1;
        for(int x : ord){
            if(!chk) break;
            if(loop[x] == 1) continue;
            if(f[x]/mid < sb_lp[x]){
                int y = par[c[x]];
                if((f[x]+f[y])/mid < sb_lp[x]) {
                    chk = 0;
                    break;
                }
                f[y] -= mid*sb_lp[x]-f[x];
                if(f[y] < 0) {
                    chk = 0;
                    break;
                }
            }
        }

        rep(i,n) if(loop[i] == 1){
            if(f[par[i]]/mid < sb_lp[par[i]]) chk = 0;
        }

        if(chk) ok = mid;
        else ng = mid;
    }
    out(ok);
}