ll@n,@k,@a[n],@b[],@c[];rep(i,n)b[i]-=c[i];rsortA(n,b);wt(sum(a(n),c(n),b(k)));