第十七讲字符串的应用.ppt

字符串的概念及应用 字符串的说明 Type 类型名 =string [n] ; var 字符串变量名 : 字符串类型名 ; 例如: type abc=string[10]; var s:abc; 说明abc 是一个长度为10的字符串类型标示符, s 是一个类型为 abc 的字符串 var 字符串变量名 : string [n] ; Var s:string; Var s:string[30]; 字符串的使用 Var s:string; ss:string[30]; 变量 s 和 ss 有什么区别? 字符串的默认长度是字符串的最大长度——255；字符串变量s的最大长度是字符串变量的默认长度，字符串变量ss的最大长度是30 字符串的初值一般设为空串（‘’)；例如: s:=‘’; ss:=‘’; 字符串的使用 字符串的赋值 S:=‘abcdefghj85765’; S:=‘’; S:=‘123’+’345’; 字符串的读入和输出 Read(s); Readln(s); Write(s); Writeln(s); 字符串的动态长度： Ord(s[0]) 关于字符串运算的几个函数和过程 函数 S:=Concat(s1,s2,s3,s4,s5); S1:=copy(s,I,n); N:=length(s); I:=pos(s1,s2); 关于字符串运算的几个函数和过程 过程 insert(s1,S,i); delete(S,i,n); Str(i,S); val(s,i,e); 课堂练习 键盘输入一个长度不超过100的字符串, 统计字符串中有多少字母、数字及其它字符。 输入若干本书的名字，将这些书名按字典顺序输出。 课前练习: 问题一：字符串的最大长度是多少？ 255 问题二：在字符串s中，ord(s[0])的含义是什么？ 字符串s的动态长度 问题三：键盘输入一个字符串，允许的最大长度是多少？ 254 Var s1，s2，s3：string[30]； s：string； I，n，e：integer； 说出下列程序段运行后的结果。 S:=‘1234567890abcdefghijABCDEFGHIJ%…—*（）’ ； S1:=‘abcdefg’; s2:=‘123467890’; I:=length(s); S3:=copy(s,9,10); N:=pos(s1,s); 程序结束后, I, s3, n 的值分别是多少? Var s1，s2，s3：string[30]； s：string； I，n，e：integer； 说出下列程序段运行后的结果。 S:=‘1234567890abcdefghijABCDEFGHIJ%…—*（）’ ； Delete(s,27,6); 程序结束后, s 的值是多少? S:=‘1234567890’ ； S1:=‘%^’; insert(s1,s,6); 程序结束后, s 的值是多少? Var s1，s2，s3：string[30]； s：string； I，n，e：integer； 说出下列程序段运行后的结果。 I=12345； str(i,s); 程序结束后, s 的值是多少? S:=‘1234’ ； S1:=‘123$3’; val(s,i,e); val(s1,i1,e1); 程序结束后, I,e,i1,e1 的值是多少? 课堂练习: 输入一个文本行, 单词之间用空格分开, 对它进行如下操作: 1, 删除指定的字符; 2, 把连续两个以上的空格删除的只剩一个; 3, 在指定的某个字母后面都增加一个空格; 4, 把指定的某个字母的大小写反过来。 课堂练习 1 2 3 4 5 6 7 8 9 10 36 37 38 39 40 41 42 43 44 11 35 64 65 66 67 68 69 70 45 12 34 63 84 85 86 87 88 71 46 13 33 62 83 96 97 98 89 72 47 14 32 61 82 95 100 99 90 73 48 15 31 60 81 94 93 92 91 74 49 16 30 59 80 79 78 77 76 75 50 17 29 58 57 56 55 54 53 52 51 18 28 27 26 25 24 23 22 21 20 19 方格填数: 键盘输入一个N,将1到n2顺时针依次填入方阵中,例如输入10, 输出