Pascal第九讲(一维数组).ppt

1、讲解cene的使用，利用网络解答以下题目。 2) 陶陶摘苹果 3）不高兴的津津,一维数组 当我们需要计算全班同学的数学平均分，按前面的做法，需要依次读入每个同学的成绩，这就需要定义很多个变量，给编程带来不便。这里我们就可以使用数组。 数组是有序数据的集合。比如全班同学的成绩，用s1,s2,s3sn来分别表示第n个同学的成绩，其中s就是数组名，1n就是数组下标，用来表示第n个同学的成绩。数组在处理大量相同类型数据时非常有效。 数组分为一维数组，二维数组和多维数组。其中一维数组是最简单也是最基本的。 一维数组的定义 书上介绍了两种定义的方法，大家只要会使用第二种方法即可，格式如下： var 变量名

2、:array下标下界.下标上界 of 基本类型； 例如： var x:array1.10 of integer; 这里定义了一个名为x的数组，它包含10个元素，元素的下标从1到10，每个元素的数据类型都是整型。,说明：数组的下标可以是任何一种有序类型（除了实型），并且可以从这个类型的任意一个值开始编排，而不一定是从1开始， 例如 r:array100.200 of real 判断以下数组定义是否合理 var a:array16.12 of integer; b:array1.1.1.5 of char; n:integer; c:array1.n of real; 数组的使用 使用数组时，就是

3、把数组元素当作相应类型的变量来使用。数组元素的使用方法和普通变量基本相同。 例如： x1:=3; x2:=x1+5; readln(x3); writeln(x3); 数组的下标可以是常量，也可以是变量或表达式。 例如： i:=1; ai:=3; ai+1:=5; ai+2:=7; 当使用变量或表达式作下标时，通过改变变量和表达式的值，可以引用数组中的不同元素。借助这一特点，我们可以利用循环语句对数组中的元素成批操作。 例如： for i:=1 to 10 do read(ai);,一维数组应用实例 例7-2 借助一维数组，生成斐波那契数列的前20项。 斐波那契数列前几项为 1 1 2 3 5

4、 8 13 21 32 如果用数组来存储则 a1=1, a2=1, a3=2, a4=3 . 可以看出，当n2时， an=an-1+an-2; 请写出完整的程序。 例7-3 读入10个整数，按升序（由大到小）进行排序，并显示结果。 分析： 这里我们介绍一种简单的排序方法。首先找出n个数中最小的数，与第1个位置上的数交换；再找出剩下n-1个数中最小的数，与第2个位置上的数交换；再找出剩下n-2个数中最小的数，与第3个位置上的数交换；。直到剩下2个数时，将这2个数中较小的数与第n-1个位置上的数交换位置。剩下的最后一个数一定是最大的数，此时完成升序排序。,var a:array1.10 of integer; i,j,k,t:integer; i,j 用于循环控制，k指向当前最小元素,t是临时变量 begin writeln; for i:=1 to 10 do read(ai); for i:=1 to 9 do 从第1个数起，到第n-1个数止 begin k:=i; for j:=i+1 to 10 do if ajk then begin t:=ai; ai:=ak; ak:=t; en