program complete; var t,tt:longint; s,c:integer; i,j,k:integer; num:array[0..101,1..250] of longint; begin readln(t); for tt:=1 to t do begin readln(s,c);fillchar(num,sizeof(num),0); for i:=1 to s do read(num[0,i]); for i:=1 to s do for j:=1 to s-i do num[i,j]:=num[i-1,j+1]-num[i-1,j]; k:=0; for i:=1 to s do for j:=1 to s-i do if num[i,j]<>0 then k:=i; for i:=k downto 0 do for j:=1 to s+c+2 do num[i,j+1]:=num[i,j]+num[i+1,j]; write(num[0,s+1]); for i:=2 to c do write(' ',num[0,s+i]); writeln; end; end.