poj1658

Description

Eva的家庭作业里有很多数列填空练习。填空练习的要求是：已知数列的前四项，填出第五项。因为已经知道这些数列只可能是等差或等比数列，她决定写一个程序来完成这些练习。

Input

第一行是数列的数目t（0 <= t <= 20）。以下每行均包含四个整数，表示数列的前四项。约定数列的前五项均为不大于10^5的自然数，等比数列的比值也是自然数。

Output

对输入的每个数列，输出它的前五项。

Sample Input

2
1 2 3 4
1 2 4 8

Sample Output

1 2 3 4 5
1 2 4 8 16

呵呵

program poj1658;
var
  t,i,j,k:longint;
  f:array [1..5] of longint;
begin
  read(t);
  while t>0 do
    begin
      dec(t);
      for i:=1 to 4 do
        read(f[i]);
      k:=f[2]-f[1];
      if (f[3]-f[2]=k)and(f[4]-f[3]=k) then
        f[5]:=f[4]+k
                                       else
        f[5]:=f[4]*(f[4] div f[3]);
      for i:=1 to 5 do
        write(f[i],' ');
      writeln;
    end;
end.