program iepuri;

var
   t, n, x, y, q, z, a, b, c, i, j: longint;
   sol: array[1..4] of longint;
   f, g: text;

begin
   assign(f, 'iepuri.in');
   reset(F);
   assign(g, 'iepuri.out');
   rewrite(g);
   readln(f, t);
   for q:=1 to t do
      begin
         readln(f, sol[1], sol[2], sol[3], c, b, a, n);
         for i:=1 to n-2 do
            begin
               sol[4]:=a*sol[1]+sol[2]*b+sol[3]*c;
               sol[4]:=sol[4] mod 666013;
               sol[1]:=sol[2];
               sol[2]:=sol[3];
               sol[3]:=sol[4];
            end;
         writeln(g, sol[4]);
      end;
   close(F);
   close(G);
end.