教案pascal语言(二维数组).pptVIP

二、多维数组 1.多维数组与二维数组 ①多维数组： 当一个数组中的数组元素具有两个或两个以上的下标时，这种数组称为多维数组。在free pascal中由于可使用内存扩充到2GB,原则上没有维数限制，但每个数组变量所占内存字节数将很大。如果不是特别需要，一般不要超过三维。多维数组都是在一维数组的基础上衍生出来的，当组成一维数组的各个元素本身又均为数组时，该数组即为多维数组。 ②二维数组： 涵义：基类型本身又是一个一维数组的数组。 例如： 一维数组： type 数组类型名=array[下标类型1] of 数组元素类型; 二维数组： type 数组类型名=array[下标类型1,下标类型2] of 数组元素类型; * 2.二维数组的定义： 二维数组定义与一维数组类同，只是下标类型有2个。2个下标类型规定该数组为二维数组及2个下标的取值范围，同时规定数组元素的个数。 定义的两种形式： ① type区定义，var区说明。 type 数组类型名=array[下标类型1，下标类型2] of 数组元素类型； 例如： type week=(sun,mon,tue,wed,thu,fri,sat); class=array[mon..sat,1..7] of char; var class1,class2:class; ②直接在var区中说明数组。 例如： var s:array[1..4,1..5] of integer; * ③说明： 习惯上，把二维数组理解成二维表格（或矩阵）的形式，将下标1理解为行号，将下标2理解成列号。 ④常量说明：（用于给数组变量赋初始值） 一行一行列举法。 例如：一个四阶方阵 const n=4; unimax:array[1..n,1..n]of integer =((1,0,0,0),(0,1,0,0),(0,0,1,0),(0,0,0,1)) ((1,0,1,0),(0,1,1,0) ,(0,1,0,1),(0,0,0,1)); * 3.二维数组的存储: Turbo pascal按行优先的顺序存储数组元素，依次把各行的元素放入一串连续的存储单元中，数组的存储如图所示： var s:array[1..4,1..5] of integer; 1 2 3 4 5 10 9 8 7 6 11 12 13 14 15 20 19 18 17 16 * 4.应用举例 ①输入10名学生5门功课的成绩，输出各人各科成绩及总分。 var score:array[1..10,1..6] of integer; i,j:integer; begin for i:=1 to 10 do score[i,6]:=0; for i:=1 to 10 do for j:=1 to 5 do begin read(score[i,j]); score[i,6]:=score[i,6]+score[i,j]; end; for i:=1 to 10 do begin for j:=1 to 6 do write(score[i,j]:6); writeln; end; end. 56 89 49 78 65 85 99 88 89 97 75 69 87 85 84 65 85 84 68 92 56 58 65 69 62 78 98 78 89 85 78 69 88 77 85 45 65 74 68 87 78 75 76 77 78 85 78 84 86 84 1 2 3 4 5 6 1 2 3 4 5 6 7 8 9 10 * var yh:array[1..10,1..10] of integer; i,j:integer begin yh[1,1]:=1; for i:=2 to 10 do begin yh[i,1]:=1;yh[i,i]:=1; for j:=2 to i-1 do yh[i,j]:=yh[i-1,j-1]+yh[i-1,j]; end;