年江苏省信息学奥林匹克冬令营.pptVIP

字符串 定义 输入和输出 字符串函数 应用举例 定义 var a:string; 字符串变量具有一般字符数组不同的附加特性。 1、字符串可以用‘+’进行连接； ‘123’+‘456’ 结果为‘123456’ 2、允许在字符串之间进行关系运算； ‘abcde’’abc’ 结果为true ‘abcde’’aefgh’ 结果为false 字符串的输入与输出 例1 输入两串字母，并按字典顺序将其输出。 var str1,str2:string; begin readln(str1); readln(str2); if str1str2 then begin writeln(str1); writeln(str2); end else begin writeln(str2); writeln(str1); end; end . 字符串操作的预定义过程和函数 (1)length函数返回串的长度，即串中字符的个数，其结果为整型。句法：length(st)。 算法分析：对两个字串中的字符依次扫描，比较它们是否相等。 顺序存储方式下的模式匹配算法。 子串的定位运算通常称为字串的模式匹配。若求子串t在字串s中的位置，则称t为模式。 字符串举例1： 字符串例1程序： Var s,t:Sstring; I,j:integer; Begin Readln(s,t); i:=1;j:=1; while (i=length(s)) and (j=length(t)) do if s[i]=t[j] then begin i:=i+1; j:=j+1; end else begin i:=i-j+2;j:=1; end; if jlength(t) then at:=i-4 else at:=0; End. i:=i+1; j:=j+1; i:=i-j+2;j:=1; 字符串操作的预定义过程和函数 (2)pos函数句法为pos(st1,st2)，其功能是在st2串中查找出现st1串的起始位置，找到则返回该位置值，否则返回值为0。 (3)str(value,st)过程将数value转化成数字串st。 (4)val(st,value,code)过程将数字串st转化为数value，code返回检测出错的第一个字符位置，未出错时返回0。 (5)copy(st,pos,num)函数在st串中从pos位置开始顺序截取长度为num的字串，其结果为字符串类型。 (6)删除子串过程——delete 句法：delete(ST,pos,NUM) 从源串ST中删除一个从pos开始的NUM个字符的子串。 若posST长度，则不删除任何字符； 若pos超出1..255范围，出错； 若pos+NUMST长度，则仅删除串内长度； 检验方法：输出被删后的原串。 单词接龙游戏： 游戏规则：输入两个单词，判断是否可以首尾拼接，一单词首部和另一单词尾部有相同的字符串才能拼接，如果可以拼接，输出“yes”，否则输出“no”。 字符串举例2： 字符串例2程序： program jing2; var i,j:integer; str1,str2:string; begin readln(str1); readln(str2); j:=1; repeat if (copy(str1,1,j)=copy(str2,length(str2)-j+1,j)) or (copy(str2,1,j)=copy(str1,length(str1)-j+1,j))then begin write(yes); exit; end; j:=j+1; until j; if (length(str2)-j+1)j then write(no); end. (length(str2)-j+1)j; 输入一行英文句子，句子