Pascal字符串应用(下).pptVIP

第五讲: 字符串的应用（下） 08年上学期 提高班讲稿 内容提要 字符的定义和其ASCII码的特点； 字符串的使用； 字符串函数的应用； 字符串在进制转化应用； 回顾知识点 一：字符类型的概念回顾 字符是一个有序类型, 字符的大小顺序按其ASCⅡ代码的大小而定。函数succ、pred、ord适用于字符类型。例如：后继函数：succ(a)=b　　　前继函数：pred（B）=A　　　序号函数：ord（A）=65 字符函数：chr(65)=‘A’ 注意：‘A’~’Z’的ASCII码是连续的； ‘a’~’z’的ASCII码是连续的； ‘0’~’9’的ASCII码是连续的 ★在编程序的过程中 ：我们经常应用字母和数字的ASCII码的顺序性实现数字和对应数字字符的转化，和更多的应用! 例1 按字母表顺序和逆序每隔一个字母打印。即打印出：　　　　a c e g I k m o q s u w y　　　　z x r v t p n l j h f d b 　程序如下：program ex8_1;　　　var letter:char;　　　begin　　　　for letter:=‘a’ to ‘z’ do　　　　if (ord(letter)-ord(‘a’))mod 2=0 then write(letter:3);　　　　writeln;　　　　for letter:=‘z’ downto ‘a’ do　　　　if (ord(letter)-ord(‘z’))mod 2 =0 then write(letter:3);　　　writeln;　　end.　　 分析：程序中，我们利用了字符类型是顺序类型这一特性，直接将字符类型变量作为循环变量，使程序处理起来比较直观。 二：字符串的定义 字符串是由字符组成的有穷序列。一个字符串中的字符可以通过其对应的下标灵活使用。　　字符串类型定义： 　　type 字符串类型标识符=string[n];　　var　　　字符串变量: 字符串类型标识符;　　其中:n是定义的字符串长度,必须是0~255之间的自然整数,第0号单元中存放串的实际长度,程序运行时由系统自动提供,第1~n号单元中存放串的字符。若将string[n]写成string，则默认n值为255。　例如：type　　　　　　man=string[8]；　　　　　　　var　　　　　　name：man； 我们一般这样写：var man:string; 字符串的输入和输出：read(name),write(name); 求输入英文句子单词的平均长度.　　程序如下:　　program ex8_2;　　　var　　　　ch:string; {字符串类型} 　　　　s,count,j:integer;　　　begin　　　　write(‘The sentence is :’);　　　　readln(ch); {读入字符串}　 　　　s:=0;　　　　count:=0;　　　　j:=0;　　　　repeat　　　　　inc(j);　　　　　if not (ch[j] in [:,,,;,,!,?,., ]) then inc(s);　　　　　if ch[j] in[ ,.,!,?] then inc(count);　　　　until (j=ord（ch[0])) or (ch[j] in [.,!,?]);　　　　if ch[j]. then writeln(It is not a sentence.)　　　　else writeln(Average length is ,s/count:10:4);　　　end.　　分析:程序中，变量s用于存句子中英文字母的总数，变量count用于存放句子中单词的个数，ch[j]表示ch串中的第j个位置上的字符，ord（ch[0]）为ch串的串长度。程序充分利用Turbo Pascal允许直接通过字符串下标得到串中的字符这一特点，使程序比较简捷。 三、字符串的操作 （一）字符串的运算和比较 　　由字符串的常量、变量和运算符组成的表达式称为字符串表达式。　　字符串运算符包括：　　1．+：连接运算符　　例如：Turbo +PASCAL的结果是Turbo PASCAL。　　若连接的结果字符串长度超过255，则被截成255个字符。若连接后的字符串存放在定义的字符串变量中，当其长度超过定义的字符串长度时，超过部份字符串被截断。　　例如：var　　　　　　str1，str2，str3：string[8]；