Pagini recente » Cod sursa (job #1053462) | Cod sursa (job #250684) | Cod sursa (job #1134611) | Cod sursa (job #18229) | Cod sursa (job #670395)
Cod sursa(job #670395)
type tab=array [1..7] of longint;
var ta:array [0..2000000000] of longint;
t1:array [1..100] of tab;
var i,j,n,t:longint;
fi,fo:text;
begin
assign(fi,'iepuri.in'); reset(fi);
assign(fo,'iepuri.out'); rewrite(fo);
readln(fi,t);
for i:=1 to t do begin
for j:=1 to 7 do
read(fi,t1[i][j]);
readln(fi);
end;
for j:=1 to t do begin
ta[0]:=t1[j][1];
ta[1]:=t1[j][2];
ta[2]:=t1[j][3];
n:=t1[j][7];
for i:=3 to n do
ta[i]:=t1[j][4]*ta[i-1]+t1[j][5]*ta[i-2]+t1[j][6]*ta[i-3];
writeln(fo,ta[n]);
end;
close(fi); close(fo);
end.