C1065 01字串

題目描述 Description

 

輸出僅有0和1組成的長度爲n的字符串，而且其中不能含有3個連續的相同子串。

輸入描述 Input Description

輸入文件只有一行一個整數n，表示有0和1組成的字符串的長度。0<=n<=30。

 

一道能夠用規律作的題：

 

program C1065;
var n,i:longint;
    f:Array[0..31]of int64;
begin
read(n);
f[1]:=2;
f[2]:=4;
for i:=3 to n do
 begin
  f[i]:=f[i-1]+f[i-2];
 end;
write(f[n]);
end.