第四讲、一维、多维数组.docVIP

第四讲、一维、多维数组 一、为什么要使用数组 　　例1　输入50个学生的某门课程的成绩，打印出低于平均分的同学号数与成绩。 　　分析：在解决这个问题时，虽然可以通过读入一个数就累加一个数的办法来求学生的总分，进而求出平均分。但因为只有读入最后一个学生的分数以后才能求得平均分，且要打印出低于平均分的同学，故必须把50个学生的成绩都保留下来， 然后逐个和平均分比较，把高于平均分的成绩打印出来。如果，用简单变量a1，a2,…，a50存放这些数据，可想而知程序要很长且繁。 　　要想如数学中使用下标变量ai形式表示这50个数，则可以引入下标变量a[i]。这样问题的程序可写为： 　　tot:=0;{tot表示总分} 　　for i:=1 to 50 do ｛循环读入每一个学生的成绩，并累加它到总分｝ 　　　begin 　　　　read(a[i]); 　　　　tot:=tot+a[i]; 　　　end; 　　ave:=tot/50;｛计算平均分｝ 　　for i:=1 to 50 do 　　　if a[i]ave then writeln(No.,i, ,a[i]);｛如果第i个同学成绩小于平均分，则将输出｝ 而要在程序中使用下标变量，则必须先说明这些下标变量的整体―数组，即数组是若干个同名（如上面的下标变量的名字都为a）下标变量的集合。 二、一维数组 1、一维数组类型的定义 一维数组类型的一般格式： 　　　　array[下标1..下标2] of 基类型; 说明：其中array和of是pascal保留字。下标1和下标2 是同一顺序类型，且下标2的序号大于下标1的序号。它给出了数组中每个元素(下标变量) 允许使用的下标类型，也决定了数组中元素的个数。基类型是指数组元素的类型，它可以是任何类型，同一个数组中的元素具有相同类型。因此我们可以说，数组是由固定数量的相同类型的元素组成的。 一般在定义数组类型标识符后定义相应的数组变量，如： var a:array[1..50]of integer; 当在说明部分定义了一个数组变量之后,pascal 编译程序为所定义的数组在内存空间开辟一串连续的存储单元。 2、一维数组的引用 　　当定义了一个数组，则数组中的各个元素就共用一个数组名( 即该数组变量名)，它们之间是通过下标不同以示区别的。 对数组的操作归根到底就是对数组元素的操作。一维数组元素的引用格式为： 　　数组名[下标表达式] 　　说明：①下标表达式值的类型, 必须与数组类型定义中下标类型完全一致,并且不允许超越所定义的下标下界和上界。 　　　　　②数组是一个整体，数组名是一个整体的标识，要对数组进行操作，必须对其元素操作。数组元素可以象同类型的普通变量那样作用。如:a[3]:=34;是对数组a中第三个下标变量赋以34的值。read(a[4]);是从键盘读入一个数到数组a第4个元素中去。 　　特殊地,如果两个数组类型一致,它们之间可以整个数组元素进行传送。如： 　　var a,b,c:array[1..100] of integer; 　　begin 　　　c:=a;a:=b;b:=c; 　　end. 　　在上程序中，a,b,c三个数组类型完全一致， 它们之间可以实现整数组传送，例子中，先将a数组所有元素的值依次传送给数组c，同样b数组传给a，数组c又传送给b，上程序段实际上实现了a,b 两个数组所有元素的交换。 　　对于一维数组的输入与输出, 都只能对其中的元素逐个的输入与输出。在下面的应用示例中将详细介绍。 3、一维数组应用示例 　　例2 输入50个数,要求程序按输入时的逆序把这50个数打印出来。也就是说，请你按输入相反顺序打印这50个数。 　　分析：我们可定义一个数组a用以存放输入的50个数, 然后将数组a内容逆序输出。 　　源程序如下： 　　program ex5_1; 　　type arr=array[1..50]of integer; {说明一数组类型arr} 　　var a:arr;i:integer; 　　begin 　　　writeln(Enter 50 integer:); 　　　for i:=1 to 50 do read(a[i])；{从键盘上输入50个整数} 　　　readln; 　　　for i:=50 downto 1 do {逆序输出这50个数} 　　　　write(a[i]:10); 　　end. 4、练习 1、输入5个考分数，计算它们的平均分和总分。 2、输入10个考分数，将成绩大于80分的同学加10分，但每人的总分不得大于100分，并输出。 3．输入一串小写字母（以.为结束标志），统计出每个字母在该字符串中出现的次数(若某字母不出现，则不要输出)。 　　例： 　　输入：aaaabbbccc. 　　输出：a:4