资源描述：
《Pascal入门教程(5)》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、第六章枚举型和子界型内容提要本章介绍了两种自定义数据类型：枚举类型和子界类型及它们的定义和计算方法。学习要求通过对本章的学习，我们要掌握枚举型和子界型两种简单的自定义类型的定义方法，能熟练把自定义的类型运用到程序设计中。在前面几章里，我们学习了四种基本数据类型：实型（REAL），整型（INTEGER）,布尔型（BOOLEAN），字符型（CHAR）。但是，仅仅这几种类型还不能满足我们的需要，我们希望能定义自己的数据类型。TURBOPASCAL允许用户自定义数据类型，这就是本章要学习的枚举型和子界型。
2、第一节枚举型1．1枚举型的定义前面我们学习的四种基本数据类型，可以用来表达数，字符，真假的描述。但我们还是觉得有点缺欠：它们不能方便地行一些标识符的描述，如：红，橙，黄，绿，青，蓝，紫七种颜色，要在数据类型中要把它们直接表达出来，我们觉得有障碍。一个星期有七天，用英文MONDAY，TUESDAY，WEDNESDAY，THURSDAY，FRIDAY，SARURDAY，SUNDAY表示。而在计算机内有没有这种数据类型，能够很方便地将它们表示出来？有,枚举型能办到。用四种基本数据类型不便表示的标识符，而
3、且这些标识符的数量是有限的，我们可以用枚举的方法来表达它，把要用的所有标识符全部枚举出来。这种方法比较接近自然语言的表达。枚举型定义的格式如下：TYPE枚举类型名（标识符1，标识符2，标识符3，．．．．．．）；在变量说明中，我们对枚举型就这样表示：VAR变量名：枚举类型名；我们来看看对七种颜色和一个星期的七天如何定义枚举型：TYPEcolor=(red,orangr,yellow,green,indigo,blue,violet);Day=(Monday,Tuesday,Wednesday,Thu
4、rsday,Friday,Saturday,Sunday);这样，我们就有了两种新的数据类型了：COLOR，DAY。在定义枚举类型时，有几条规则：1定义时要以标识符TYPE开头。2被枚举的标识符（以字母开头的字母数字组合）要用括号括起来，标识符之间用逗号隔开。3被枚举的标识符只能在一种枚举类型中出现，且在同一类型中出现的次数只能一次。1在枚举定义中，只能用“＝”,而不能用“:=”。5所有的标识符必须被枚举出来，没列出来的标识符不能使用。以后，我们可以象用REAL，INTEGER类型一样用已定义的枚
5、举类型了。以下的定义是错误的：TYPEA=(1,2,3,4.5);数字不能作标识符B=(‘C’,’D’,’E’,’F’,’G’);字符不能作标识符C=(red,orange,yellow,green,red);同种类型中标识符出现了重复D=(red,indigo,violet);和上一类型中标识符重复对枚举类型定义好了以后，我们可以进行该种类型的变量说明了：VARA，B：COLOR；C，D：DAY；经过变量说明后，我们可以对变量A，B，C，D进行赋值。A:=red;b:=orange;C:=Mon
6、day;d:=Sunday;其实，我们可以用另一种方法来定义：VARa,b:(red,orange,yellow,green,indigo,blue,violet);C,d:(Monday,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday);也就是省掉了用TYPE定义的过程，直接进行变量说明。1．2枚举型的运算1赋值运算当我们用上一小节的知识把枚举类型定义好后，可以象一般的基本类型那样进行赋值运算。如：VARa,b:(red,orange,yell
7、ow,green,indigo,blue,violet);C,d:(Monday,Tuesday,Wednesday,Thursday,Friday,Saturday,Sunday);我们可以这样赋值运算：a:=yellow;b:=a;c:=Sunday;d:=c;这样赋值是错误的：a:=Monday;b:=3;c:=red;d:=’Tuesday’;c:=d*3;a:=a+b;2关系运算当标识符在括号中被按先后顺序罗列出来时，它就已经有序了。按在括号中出现的先后顺序，排号依次为0，1，2，3．．
8、．．．．比如在上面的定义中，RED的序号为0，ORANGE的序号为1，YELLOW的序号为2．．．．．．，VIOLET的序号为6。在另一种类型中，MONDAY的序号为0，TUESDAY的序号为1，WEDNESDAY的序号为2．．．．．．，SUNDAY的序号为6。正因为有了序号，我们就可以让同种类型中的标识符比较大小了。序号大的则标识符大，序号小的则标识符小。已知：TYPEcolor=(red,orangr,yellow,green,indigo,blue,violet);Day=(
