var f,g:text;
    h,x,y,z,a,b,c,n,i,j,t:longint;
begin
    assign(f,'iepuri.in'); reset(f);
    assign(g,'iepuri.out'); rewrite(g);
    readln(f,h);
    for i:=1 to h do
       begin
          readln(f,x,y,z,a,b,c,n);
          for j:=3 to n do
             begin
                t:=a*z+b*y+c*x;
                x:=y; y:=z; z:=t;
             end;
          if i<>h then writeln(g,z) else write(g,z);
       end;
    close(f); close(g);
end.