本文主要是介绍FBI序列，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！
【问题描述】
两伙外星人策划在未来的XXXX年侵略地球,侵略前自然要交换信息咯,现在,作为全球保卫队队长,你截获了外星人用来交换信息的一段仅由’F’,’B’,’I’,’O’,组成的序列,为了保卫地球和平,为了使家园不受破坏,你要机智地破解密码,勇敢地迎击外星人!记住,你不是一个人在战斗!你不是一个人!你的背后是千千万万的地球人！
【输入文件】
一组仅由’F’,’B’,’I’,’O’,组成的序列（’F’,’B’,’I’,’O’这四个字母中的某一个或某几个不一定会出现，且保证序列长度<=2000)
规定这个序列所要传达的信息就是这组序列有多少个’FBI’(子序列)
【输出文件】
一个数,表示这组序列有多少个’FBI’的子序列(保证答案<=2^31，且FBI必须是正序，即IBF或者BIF或者FIB或者BFI或者IFB都不能算是一个FBI)
【样例输入】
FBIIBFOI
【样例输出】
4
【样例说明】
第一个FBI是由序列的第一个字母+序列的第二个字母+序列的第三个字母组成
第二个FBI是由序列的第一个字母+序列的第二个字母+第四个字母组成
第三个FBI是由序列的第一个字母+序列的第二个字母+第八个字母组成
第四个FBI是由序列的第一个字母+序列的第五个字母+第八个字母组成
分析
f[i]表示序列的前i位有多少个字母I
i枚举F的位置，j枚举B的位置，
ans:=ans+(f[l]-f[j]);
程序：
varl,i,j:longint;ans:int64;f:array[0..3000]of longint;zfc:ansistring;
beginassign(input,'fbi.in');reset(input);assign(output,'fbi.out');rewrite(output);readln(zfc);l:=length(zfc);f[0]:=0;for i:=1 to l doif zfc[i]='I' then f[i]:=f[i-1]+1 else f[i]:=f[i-1];ans:=0;for i:=1 to l-2 doif zfc[i]='F' thenbeginfor j:=i+1 to l-1 doif zfc[j]='B' then ans:=ans+(f[l]-f[j]);end;write(ans);close(input);close(output);
end.这篇关于FBI序列的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！
