题目描述
我们可以把由“0”和“1”组成的字符串分为三类:全“0”串称为B串,全“1”串称为I串,既含“0”又含“1”的串则称为F串。
FBI树是一种二叉树,它的结点类型也包括F结点,B结点和I结点三种。由一个长度为2^N的“01”串S可以构造出一棵FBI树T,递归的构造方法如下:
1) T的根结点为R,其类型与串S的类型相同;
2) 若串S的长度大于1,将串S从中间分开,分为等长的左右子串S1和S2;由左子串S1构造R的左子树T1,由右子串S2构造R的右子树T2。
现在给定一个长度为2^N的“01”串,请用上述构造方法构造出一棵FBI树,并输出它的后序遍历序列。
输入输出格式
输入格式:
第一行是一个整数N(0 <= N <= 10),第二行是一个长度为2^N的“01”串。
输出格式:
包括一行,这一行只包含一个字符串,即FBI树的后序遍历序列。
输入输出样例
输入样例#1:
3
10001011
输出样例#1:
IBFBBBFIBFIIIFF
做法:按题目要求直接搜索就好了,最后按后序遍历输出
var
n:integer;
a:ansistring;
procedure h(a:ansistring);
var
t,i,j:longint;
begin
t:=length(a);
if t=1 then if a[1]='0' then write('B') else write('I')
else
begin
h(copy(a,1,t div 2));
h(copy(a,t div 2+1,t-t div 2));
i:=pos('0',a);
j:=pos('1',a);
if (i<>0)and(j<>0) then write('F');
if (i=0)and(j<>0) then write('I');
if (i<>0)and(j=0) then write('B')
end;
end;
begin
readln(n);
readln(a);
h(a);
end.