3×2n的骨牌问题 pascal

来源：百度知道 编辑：UC知道 时间：2024/05/22 06:11:24
已知3×2n个棋盘格子，试求用火柴棒覆盖所有格子的方法（一根火柴棒可覆盖2个格子）。
输入：n
输出：用火柴棒覆盖所有3×2n格子的方案数。
输入样例：1
输出样例：3
有没有算术方法``
最好给程序```pascal的

关键是找到递推公式
a[i]:=a[i-1]+a[i-2] i为列数
下面程序记总列数为2＊n-1
program fuga;
var
a:array[1..1000]of integer;
i,j,n:integer;
begin
assign(input,'e:\input.txt');reset(input);
assign(output,'e:\output.txt');rewrite(output);
read(n);
a[1]:=1;a[2]:=2;
for i:=3 to 2*n do
a[i]:=a[i-1]+a[i-2];
write(a[2*n-1]);
close(input);
close(output);
end.