资源描述:
《字符数组和字符串类型.ppt》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、字符数组和字符串类型数据类型简单类型子界类型枚举类型用户自定义类型标准类型字符串类型布尔型实型整型指针类型过程类型对象类型文件类型记录类型数组类型集合类型构造类型一、子界与枚举类型Pascal有丰富的数据类型,在程序设计中有特殊而方便的应用。类型定义的语法格式: type <标识符1>=<类型1>; <标识符2>=<类型2>; …… <标识符n>=<类型n>;子界与枚举1.子界类型:当某些变量的取值范围很具体时,可用子界类型,它更符合实际、便于查错和节省内存。定义如下:typeriqi=1..31;zimu='A'..'Z';varday:riq
2、i;ch1:zimu;也可以直接定义:day:1..31;year:0..200;ch1:'A'..'Z';2、枚举类型通过预定义列出所有值的标识符来定义一个有序集合,这些值的次序和枚举类型说明中的标识符的次序是一致的。枚举类型的形式: (标识符1,……,标识符n) 例如:typedaystype=(sunday,monday,tuesday,wednesday,thursday,friday,saturday) 枚举元素只能是标识符,而不能是数值常量或字符常量。例如以下的定义是错误的:< typedaystype=('sun','mon','tue
3、','wed','thu','fri','sat')枚举元素是标识符,不要把作为枚举元素的标识符视作变量名,它不能被赋值。同一个枚举元素不能出现在两个或两个以上的枚举类型定义中。例如以下的定义是错误的: typedaytype1=(monday,tuesday); daytype2=(monday,wednesday); 可以将枚举类型的定义和变量的定义结合在一起。例如:vara:(monday,tuesday,sunday)Typecolor=(red,yellow,blue,white,black);rowtype=array[1..100]ofre
4、al;inttype=array[‘A’..’E’]ofinteger;colortype=array[color]ofchar;Vara:rowtype;b:inttype;c:colortype;二、字符类型字符类型为由一个字符组成的字符常量或字符变量。字符常量定义:const字符常量=‘字符’;字符变量定义:var字符变量:char;后继函数:succ(‘a’)=‘b’;前继函数:pred(‘B’)=‘A’;序号函数:ord(‘A’)=65;1、字符数组无论数组的下标有几个,类型如何,数组元素的类型必须相同。当数组元素的类型是字符型时,称为字符数组。如:typ
5、eletter=array[1..26]ofchar;varlet:letter;或:varlet:array[1..26]ofchar;例按字母表顺序和逆序每隔一个字母打印。即打印出:acegikmoqsuwyzxrvtpnljhfdb程序如下:programex5_15;varletter:char;beginforletter:=‘a’to‘z’doif(ord(letter)-ord(‘a’))mod2=0thenwrite(letter:3);writeln;forletter:=‘z’downto‘a’doif(ord(letter)-ord(‘z’
6、))mod2=0thenwrite(letter:3);writeln;end.〔例〕在一个字符数组let中形成由a开始的连续26个大写字母构成的子串,并将其倒置后仍放在let中。Programex4_10;Varlet,let2:array[1..26]ofchar;ch:char;i:integer;Beginfori:=1to26dobeginlet[i]:=chr(i+64);write(let[i]);end;writeln;fori:=1to26dobeginlet2[i]:=let[26-i+1];end;fori:=1to26dowrite(let[
7、i]);writeln;readln;End.〔例〕在一个字符数组let中形成由a开始的连续26个大写字母构成的子串,并将其倒置后仍放在let中。Programex4_10;Varlet:array[1..26]ofchar;ch:char;i:integer;Beginfori:=1to26dobeginlet[i]:=chr(i+64);write(let[i]);end;writeln;fori:=1to13dobeginch:=let[i];let[i]:=let[26-i+1];let[26-i+1]:=ch;end;fori:=1to26dowrit