本文主要是介绍2014年初中竞赛试题(南海) 字符串，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！
题目：
作者思路：水题一道。
pos(‘bear’,st)找位置
算出包含字串的个数。
代码：
var st:ansistring;ans:longint;
beginread(st);while pos('bear',st)<>0 dobeginans:=ans+pos('bear',st)*(length(st)-(pos('bear',st)+3)+1);delete(st,1,pos('bear',st));end;write(ans);
end.
这篇关于2014年初中竞赛试题(南海) 字符串的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！
