D:
#include <bits/stdc++.h>
#include <cmath>
using namespace std;
//Main
int main(){
//Testcases
int t;
cin>>t;
//cout<<"testcases= "<<t<<endl;
while(t--){
bool sw=true;
int sum=0;
int res=0;
//Tamaño arreglo
long n;
cin>>n;
//cout<<"tamaño arreglo = "<<n<<endl;
//Tamaño mover
int d;
cin>>d;
//cout<<"mover size= "<<d<<endl;
//Arreglo números
long a[n+1];
//Leer, guardar y sumar elementos
for(int i=1;i<n+1;i++){
cin>>a[i];
sum=sum+a[i];
}
//cout<<"array"<<endl;
for(int i=1;i<n+1;i++){
//cout<<i<<" = "<<a[i]<<endl;
}
//Tiene solucion?
if(sum%n!=0){
sw=false;
}
//Prueba
for(int i=1;i<n;i++){
if(a[n]!=a[n+1]){
// sw=false;
}
}
if(sw==true){
//cout<<"entramos al proceso"<<endl;
int meta=sum/n;
int p = 1;
int q=d+p;
for(int p=1;p<=n-q;p++){
cout<<p<<" = "<<a[p]<<endl;
if(a[p]>meta){
long resta = a[p]-meta;
res += abs(resta);
// cout<<"res"<<res<<endl;
a[p] -= resta;
a[q] += resta;
}else{
// cout<<"res"<<res<<endl;
long resta2 = meta-a[p];
res += abs(resta2);
a[p] += resta2;
a[q] -= resta2;
}
q++;
}
for(int i=1;i<n+1;i++){
cout<<i<<" = " << a[i]<<endl;
}
for(int i=1;i<n+1;i++){
if(a[i]!=meta){
res=-1;
cout<<"houstom we've a problem"<<endl;
}
}
cout<<res<<endl;
}else{
cout<<-1<<endl;
}
}
}