var
  a:array [1..4] of longint;
  i,j,k,l,n:longint;
begin
  readln(n);
  for i:=1 to n do
    begin
      fillchar(a,sizeof(a),0);
      for j:=1 to 4 do read(a[j]);
      for j:=1 to 4 do write(a[j],' ');
      for j:=4 downto 1 do
        for k:=1 to j-1 do a[k]:=a[k+1]-a[k];
      l:=0;
      for j:=1 to 4 do l:=l+a[j];
      writeln(l);
    end;
end.


谁能帮我看看,牛們！！
pku1658
怎么输入1 2 4 8输出15的？？？