#include<cstdio>
#include<cstring>
#include<algorithm>
using namespace std;
const int inf=0x7f7f7f7f;
int n,tot,head[1010],nxt[1010],to[1010];
unsigned int x[1010],dp[5010],f[1010];
void add_edge(int u,int v){
	nxt[++tot]=head[u];
	to[tot]=v;
	head[u]=tot;
	return;
}
void dfs(int u){
	for(int i=head[u];~i;i=nxt[i])
		dfs(to[i]);
	memset(dp,127,sizeof(dp));
	dp[0]=0;
	for(int i=head[u];~i;i=nxt[i]){
		int v=to[i];
		for(int j=x[u];~j;j--){
			unsigned int tmp=inf;
			if(j>=x[v])
				tmp=min(tmp,dp[j-x[v]]+f[v]);
			if(j>=f[v])
				tmp=min(tmp,dp[j-f[v]]+x[v]);
			dp[j]=tmp;
		}
	}
	for(int i=0;i<=x[u];i++)
		f[u]=min(f[u],dp[i]);
	return;
}
int main(){
	memset(head,-1,sizeof(head));
	scanf("%d",&n);
	for(int i=2;i<=n;i++){
		int fthr;
		scanf("%d",&fthr);
		add_edge(fthr,i);
	}
	for(int i=1;i<=n;i++)
		scanf("%u",x+i);
	memset(f,127,sizeof(f));
	dfs(1);
	puts(f[1]!=inf?"POSSIBLE":"IMPOSSIBLE");
	return 0;
}