ascal中子界类型、数组类型讲解.ppt

《ascal中子界类型、数组类型讲解.ppt》由会员分享，可在线阅读，更多相关《ascal中子界类型、数组类型讲解.ppt（25页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、Pascal变量类型子界类型、数组类型目录子界类型.1 描述.1 定义.2 习题 1 年级人数.4数组类型.5 描述.5 定义.6单击此处浏览目录第二页。目录 读入、输出.10 定位.16 习题 2数字方阵.18单击此处浏览目录第一页。子界类型之描述 子界类型属于一种自定义类型，在FreePascal中可以对变量值得范围进行控制，从而更大可能增加程序的可靠性，不必对输入范围超出可认定范围而枉费心血去加判断语句。同时，在定义数组类型的变量中，也需要用到这种子界类型。01子界类型之定义02 子界类型有两种定义方法分别如下。第一种：type 名称=下界.上界;变量名:你之前给type后面写的名字;例

2、如：type apple=1.100;var score:apple;子界类型之定义03 第二种：变量名：下界.上界;例如：var score:1.100;注意点：注意点：变量范围必须是字符型或整数类型。和变量范围必须是字符型或整数类型。和case语句相同。语句相同。习题 1 年级人数04【题目描述】已知一年级有400人，二年级有500人，三年级501人，四年级450人，五年级510人，六年级600人。输入年级数，之后输出年纪人数。年级数必须是1到6,否则报错。【输入要求】【输入样例1】一个1到6的整数。6【输出要求】【输出样例1】整数类型，场宽5。600【输入样例2】【输出样例2】7 （报错

3、）查查看看答答案案数组类型之描述05 数组可以被看做同一类型的多个数据的一个集合。用数组下标（编号）来区分或指定每一个数组元素。FreePascal能开数组空间数量比Tubbo Pascal多很多。因此，在需要特别多空间进行数据存储时，建议使用FreePascal进行程序的编写。一维数组之定义 一维数组有两种定义方式，分别如下：第一种:type 自定义名称=array下界.上界 of 数据类型;var 变量名:自定义名称;例如:type dress=array1.100 of integer;var a:dress;注：刚才我们定义的一维数组相当于一张1行，100列的表格。06一维数组之定义

4、一维数组有两种定义方式，分别如下：第二种:var 变量名:array下界.上界 of 数据类型;例如:var a:array1.100 of longint;07二维数组之定义08 二维数组有两种定义方式，分别如下：第一种:type 自定义名称=array行下标值，列下标值 of 数据类型;var 变量名:自定义名称;例如:type dress=array1.50,1.100 of integer;var a:dress;注：刚才我们定义的二维数组相当于一张50行，100列的表格。二维数组之定义 二维数组有两种定义方式，分别如下：第二种:var 变量名:array行下标值，列下标值 of 数据

5、类型;例如:var a:array1.50,1.100 of longint;注：行下标值、列下标值可以不从1开始。09一维数组之读入、输出 一维数组的全部读入需要一个循环变量，下面是读入所有元素的程序：var a:array1.100 of integer;i:integer;begin for i:=1 to 100 do read(ai);end.10一维数组之读入、输出 一维数组的全部输出需要一个循环变量，下面是输出所有元素的程序（末尾有空格）：var a:array1.100 of integer;i:integer;begin for i:=1 to 100 do write(ai

6、,);end.11一维数组之读入、输出 如果末尾不能有空格，那么程序就是这样的：var a:array1.100 of integer;i:integer;begin write(a1);for i:=2 to 100 do write(,ai);end.12二维数组之读入、输出 二维数组的全部读入需要两个循环变量，靠外的一层控制行，另一层循环控制列，下面是读入所有元素的程序：var a:array1.100,1.100 of integer;i,j:integer;begin for i:=1 to 100 do for j:=1 to 100 do read(ai,j);end.13二维数

7、组之读入、输出 二维数组的全部输出需要两个循环变量，下面是输出所有元素的程序（末尾有空格）：var a:array1.100,1.100 of integer;i,j:integer;begin for i:=1 to 100 do for j:=1 to 100 do write(ai,j,);end.14二维数组之读入、输出 如果末尾不能有空格，那么程序就是这样的：var a:array1.100,1.100 of integer;i,j:integer;beginfor i:=1 to 100 do write(i,1);for j:=2 to 100 do write(,ai,j);e

8、nd.15一维数组之定位161009998100 99.5 a1 a2 a3 a4 a5这是一个有5个元素的一维数组，假如说输出其中一个元素，那么程序解释如下：write(a下标);假如要读入第五个元素，那么程序是这样的，其他操作以此类推：read(a5);二维数组之定位1710099.599100100979910099.5969810088959796.5二维数组之定位 之前呈现的是一个四行四列的二维数组，一般输出某个内容的程序是这样的：write（行号，列号）；例如输出第三行第四列的程序是：write(3,4);剩下的以此类推。18习题2数字方阵【题目描述】读入一个数字，利用二维数组根据要求和样例输出数字方阵。【输入要求】【输出要求】一个整数。每个数字场宽为三。【输入样例】4【输出样例】1 2 3 4 5 6 7 8 9 10 11 12 13 14 45 1619查查看看答答案案The end.