- 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
PASCAL语言字符与字符串剖析
* * PASCAL语言 一、字符型 字符类型为由一个字符组成的字符常量或字符变量 。 字符常量定义: const 字符常量=‘字符’ 字符变量定义: Var 字符变量:char; 字符类型是一个有序类型, 字符的大小顺序按其ASCII代码的大小而定。函数succ、pred、ord适用于字符类型。 例如:后继函数:succ(‘a’)=‘b’ 前继函数:pred(‘B’)=‘A’ 序号函数:ord(‘A’)=65 字符型用char作为标识符。字符型必须用单引号括起来,字母作为字符型时,大小写是不等价的,并且字符型只允许单引号中有一个字符,否则就是字符串。 Var a:char; a:=‘b’; a:=‘B’; a:=‘2’; 知识点: 1、字符的ASCII码(序号):一一对应关系 56 8 57 55 54 53 52 51 50 49 48 ASCII 9 7 6 5 4 3 2 1 0 字符 90 67 66 65 ASCII Z … … C B A 字符 122 99 98 97 ASCII z … … c b a 字符 2、函数:ord(x) chr(x) 1)、ord(x):返回字符x的ASCII码。 i:=ord(‘A’); j:=ord(‘B’);n:=ord(‘1’); write(I,j,n); 65 66 49 2)、 chr(x):返回ASCII码为x的字符。 var a:char; a:=chr(98); writeln(a); write(chr(97)); 3、字符大小的比较(相应字符ASCII码大小的比较): ASCII码大的字符大。 ‘b’’a’ ‘5’’1’ ‘a’’A’ 4、数字字符转换为相应的数字的方法。 var x:char; a:integer; x:=‘3’; a:=ord(x)-48; 练习题目: 1、从键盘上输入一串字符(可能含数字、小写字母),以#作为输入结束标志。 编程完成: 统计输入字符中每个小写字母出现的次数(没有出现的不输出)。 样例: 输入: 2bcdaab33wycc# 输出: a 2 b 2 c 3 d 1 w 1 y 1 算法一: var ch:char; n,i:integer; a:array[1..26] of integer; {统计字母出现的次数} begin for i:=1 to 26 do a[i]:=0; read(ch); while ch# do begin if(ch=a)and(ch=z) then begin i:=ord(ch)-96; a[i]:=a[i]+1; end; read(ch); end; for i:=1 to 26 do {输出字符及出现的次数} if a[i]0 then writeln(chr(i+96), ,a[i]); end. var ch:char; n,i:integer; a:array[97..122] of integer; {统计字母出现的次数} begin for i:=97 to 122 do a[i]:=0; read(ch); while ch# do begin if(ch=a)and(ch=z) then a[ord(ch)]:=a[ord(ch)]+1; read(ch); end; for i:=97 to 122 do {输出字符及出现的次数} if a[i]0 then writeln(chr(i), ,a[i]); end. 算法二: 算法三: var ch:char; n,i:integer; a:array[a..z] of integer; {统计字母出现的次数} begin for ch:=a to z
您可能关注的文档
- 第九章融资融券业务及会计核算课件.ppt
- 第九章脂类代谢的合成与课件.ppt
- 第九章胚胎诱导课件.ppt
- 第九章电影场景构图课件.ppt
- 第九章螺纹公差及检测课件.ppt
- 第九章责任会计课件.ppt
- 第九章评价中心课件.ppt
- 第九章航空燃气轮机主燃烧室工作特性课件.ppt
- 第九章管内气液两相流基础_1课件.ppt
- 第九章负债审计课件.ppt
- 中考语文小说阅读赏练-----张港小说(含解析).docx
- 2025中考英语阅读理解阅读还原真题汇总练习题(含答案解析).docx
- 中考语文小说阅读赏练-----司玉笙小说(含解析).docx
- 2024年新人教版一年级数学上册课件 单元 第2课时 11~20的认识.pptx
- 2024年秋季新人教版七年级数学上册教学课件 第二章 有理数的运算 2.1.1有理数的加法 (第2课时).pptx
- 2024秋新人教版英语七年级上册课件 Starter Unit 1 Section B (Project 2a—2c).pptx
- 2024秋新人教版英语七年级上册课件 Unit6 A Day in the Life Section B.pptx
- 2024年秋鲁教版(五四制)六年级上册英语教学课件 Unit4 Section A (1a-1d) (第1课时).pptx
- 2024年秋季新西师大版一年级上册数学课件 第一单元 0~9的认识 2.比较 第1课时 比较大小.pptx
- 2024年秋季新苏教版一年级上册数学教学课件 第一单元 第6课时 5以内的加法.pptx
文档评论(0)