ll@N,@A[N],t=0;sortA(N,A);wt(sum[i,0,N](A[i]*i-t,t+=A[i]));