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