a[4000],t[2000],i,j,k,m,M;main(p){for(;~scanf("%d",a+i++););for(M=i=*a;j=i--;M=M>m?m:M)for(m=0,bcopy(a,(int)t-2,7e3);j<=*a+i;m=fmax(m,(t[p]+=a[j++%*a-~*a]/2<<16|1)&2047))for(k=*a;k--;t[k]