a[4000],t[2000],i,j,k,p,M;main(n){for(scanf("%d",&n);~scanf("%d",a+i++);M=n);for(i=n;i--;M=M>k?k:M){for(k=n;k--;)t[k]=a[k]*2e3;for(;j