Pagini recente » Cod sursa (job #2517530) | Cod sursa (job #1327594) | Cod sursa (job #2516356) | Cod sursa (job #1063770) | Cod sursa (job #20823)
Cod sursa(job #20823)
var z,t,i,j,aux,n:longint;
x:array[1..3]of longint;
a:array[1..3]of longint;
v:array[1..999]of longint;
begin
//assign(input,'iepuri.in');reset(input);
//assign(input,'iepuri.out');rewrite(output);
readln(t);
for i:=1 to t do begin
read(x[1],x[2],x[3],a[1],a[2],a[3],n);
for j:=1 to n-2 do begin
aux:=x[1]*a[1]+x[2]*a[2]+x[3]*a[3];
x[1]:=x[2];
x[2]:=x[3];
x[3]:=aux;
end;
v[i]:=x[3];
end;
for i:=1 to t do writeln(v[i] mod 666013);
//close(input);close(output);
end.