enum{X=2000};a[X],b[X],t[X],i,j,k,p,M;main(n){for(scanf("%d",&n);i<n?scanf("%d",a+i):~scanf("%d",b+k++);M=n);for(;i--;M=M>k?k:M){for(;k--;)t[k]=a[k]*X;for(;j<n;t[p]+=b[(i+j++)%n]/2*X+1)for(k=n;k--;t[k]<t[p]?p=k:0);for(;j--;)k=fmax(k,t[j]%X);}M=!printf("%d",M);}