int d[8d6][2]{},s=0;
d[0][0]=-1;
int@n,@a[n];
rep(i,n){
	s+=a[i];
	rrep(j,a[i],8d6){
		if(d[j-a[i]][0]){
			if(!d[j][0]){
				d[j][0]=i+1;
			}else if(!d[j][1]){
				d[j][1]=i+1;
			}
		}
	}
}
rep(j,1,8d6){
	if(d[j][1]){
		ll v=s-j*2;
		wt(v?v:-1);
		exit(0);
	}
}
wt(-1);