ll@N,@A[N];wt(sum[i,0,N](sum[j,0,N](abs((i-j)*(A[i]-A[j])))));