资源描述：
《Pascal基本教程--第六章枚举类型和子界类型.doc》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、枚举型和子界型数据类型可以分为三大类：简单类型、构造类型和指针类型。其中简单类型可以分为标准类型(整形、实型、字符型、布尔型)和自定义类型(枚举类型、子界类型)，构造类型可以分为数组类型、集合类型、记录类型和文件类型。6.1 类型定义用计算机解决客观世界的问题时，需要用计算机程序中的量来描述客观世界的问题。但有此问题很难用标准类型为描述，如一个星期的七天、一年的十二月、颜色的类别等。 类型定义的语法格式： type <枚举类型标识符>=(<标识符1>，<标识符2>，……，<标识符n>) 如：typedaytype=(sun,mon,tru,wed,thu,fr
2、i,sat);colortype=(red,yellow,blue,white);typeBoolean=(false,true);6.2 枚举类型 通过预定义列出所有值的标识符来定义一个有序集合，这些值的次序和枚举类型说明中的标识符的次序识一致的。枚举类型的形式：(标识符1，……，标识符n)例如：typedaystype=(sunday,monday,tuesday,wednesday,thursday,friday,saturday) 枚举元素只能是标识符，而不能是数值常量或字符常量。例如以下的定义是错误的：typedaystype=('sun','mon',
3、'tue','wed','thu','fri','sat') 枚举元素是标识符，不要把作为枚举元素的标识符视作变量名，它不能被赋值。同一个枚举元素不能出现在两个或两个以上的枚举类型定义中。例如以下的定义是错误的：typedaytype1=(monday,tuesday);daytype2=(monday,wednesday); 可以将枚举类型的定义和变量的定义结合在一起。例如：vara:(monday,tuesday,sunday) 枚举类型属于顺序类型。根据定义类型时各枚举元素的排列顺序确定它们的序列，序列号从0开始。例如：已经定义daystype ord
4、(sunday)=0,succ(sunday)=monday,pred(friday)=thursday 但是枚举类型中的第一个元素没有前趋，最后一个元素没有后继。TurboPascal不允许直接读写枚举值，所以枚举值的输出常用case语句间接的输出。枚举值的输入，则要一一判断读入字符是否是枚举类型的标识符。若是才能赋给枚举变量，否则就会出错。对枚举类型只能进行赋值运算和关系运算，不能通过write输出或read输入。枚举值的输入，一般先读入序号，通过case语句将枚举值相应地赋给枚举变量；输出时，通过case语句判断枚举类型变量的值，输出对应的字符串。例如：输入今
5、天是星期几的序号(星期天的序号为0)，输出明天是星期几的英文单词。 programmei;typedaytype=(sunday,monday,tuesday,wednesday,thursday,friday,saturday)vark:integer;today,tomorrow:daytype;beginreadln(k);casekof0:today:=Sunday;1:today:=monday;2:today:=tuesday;3:today:=wednesday;4:today:=thurday;5:today:=friday;6:today:=satu
6、rday;end;iftoday=satrudaythentomorrow:=Sundayelsetomorrow:=succ(today);write(‘Tomorrowis:’);casetomorrowof sunday:write('sunday'); monday:write('monday'); tuesday:write('tuesday'); wednesday:write('wednesday'); thursday:write('thursday'); friday:write('friday'); saturday:write('s
7、aturday'); end;end.6.3 子界类型 子界类型是由整型、字符型、枚举型、布尔型的两个常量指定该类型的值域区间。子界类型的形式： type <子界类型标识符>=<常量1>．．<常量2> 两个常量必须是同一种顺序类型。例如：a．．b，要求a<=b例如： typea=1..3;b='a'..'d';可以将子界类型的定义和变量的定义结合在一起。例如：vara:1．．9与枚举类型一样，定义了子界类型后，就可以定义子界类型的变量了。如：typeagetype=1..150;chtype=’a’..’z’;vara1,a2:ag
