Luogu P2562 [AHOI2002]Kitty猫基因编码

题目描述

小可可选修了基础生物基因学。教授告诉大家 Super Samuel 星球上 Kitty猫的基因的长度都是 2 的正整数次幂 )， 全是由两种不同的基因单元组成的。 这两种不同的基因单元分别记成 0 和 1，于是 Kitty 猫基因可以写成一个 01 串表达式 。

为了便于分析和降低数据存储量，教授发明了 ABC 编码规则。该编码规则是不断地按照

对 Kitty 猫基因 01 串表达式 进行改写， 直至最终被改写成只含有字符 “ A”、“ B”、“ C”的符号串。

请你编写程序帮助小可可求出 Kitty 猫基因的 ABC 编码以协助教授开展科研工作。

输入输出格式

输入格式：

文件中以一行的形式存放了一个 Kitty 猫基因的 01 串表达式。

输出格式：

以一行的形式输出这个 Kitty 猫基因的 ABC 编码。

输入输出样例

输入样例#1：

00

输出样例#1：

A

输入样例#2：

01001011

输出样例#2：

CCCABACCBAB

Solution

很直白的递归题……

三种情况在题目描述内已解释得很清楚了，直接编代码就行了……（思维要求较少，初学者必备）

话说这里判断子串是否只有0或1不用循环一个一个去判断，只需用pos判断是否存在另一个数就行了……

不多说，直接上代码。

——————分割不完全的分割线——————

pascal代码如下：

var s:ansistring;//数据长度超过string范围，故用ansistring
function go(s:ansistring):ansistring;//同上
begin
  if pos('1',s)=0 then//子串全部是0，即子串内不含1
  go:='A'//编码为A
  else
  if pos('0',s)=0 then//子串全部是1，即子串内不含0
  go:='B'//编码为B
  else
  go:='C'+go(copy(s,1,length(s) div 2))+go(copy(s,length(s) div 2+1,length(s) div 2));//子串有0有1，编码为C和前后两段字串递归下去（copy那一段较难理解，请认真思考）
end;
begin
  readln(s);
  writeln(go(s));//开始递归
end.