program p1;
type tablou=array[1..100,1..8]of longint;
var    t:tablou;
        i,j,p,z:longint;
       f,g:text;
begin;
assign(f,'iepuri.in');
reset(f);
read(f,Z);
for i:=1 to z do
 begin
 for j:=1 to 7 do
 read(f,t[i,j]);
 end;
 close(f);
 assign(g,'iepuri.out');
rewrite(g);

 for j:=1  to z do
begin
 for i:=3 to t[j,7] do
begin
t[j,8]:=t[j,4]*t[j,3]+t[j,5]*t[j,2]+t[j,6]*t[j,1];
t[j,1]:=t[j,2];
t[j,2]:=t[j,3];
t[j,3]:=t[j,8];
end;
writeln(g,t[j,8]);
end;
close(g)
end.