var q:array[0..1000000] of longint;
    f,g:text;
    w,t,a,b,c,x,y,z,n,i:longint;
begin
 assign(f,'iepuri.in'); reset(f);
 assign(g,'iepuri.out'); rewrite(g);
 read(f,t);
 for w:=1 to t do begin
  read(f,x,y,z,a,b,c,n);
  q[0]:=x;
  q[1]:=y;
  q[2]:=z;
  for i:=3 to n do
   q[i]:=(a*q[i-1]+b*q[i-2]+c*q[i-3]) mod 666013;
  writeln(g,q[n]);
 end;
 close(f); close(g);
end.