ll@n,@x[n],s=sum(x(n));wt(s+1-Mint(sum[i,0,n](x[i]**2))/s);