pascal-二维及多维数组知识.pdfVIP

const a:array[1..4,1..4] of integer=((1,1,1,1),(1,1,1,1),(1,1,1,1),(1,1,1,1)) 这样子就定义了一个长 4 宽 4 所有元素为 1 的二维数组常量。 多维数组 一、多维数组的定义 当一维数组元素的类型也是一维数组时，便构成了二维数组。二维数组定义的一般格式： array[ 下标类型 1] of array[ 下标类型 2] of 元素类型； 但我们一般这样定义二维数组： array[ 下标类型 1，下标类型 2] of 元素类型； 说明：其中两个下标类型与一维数组定义一样，可以看成 下界 1..上界 1 和下界 2.. 上界 2 ，给出二维数 组中每个元素 ( 双下标变量 )可以使用下标值的范围。 of 后面的元素类型就是基类型。 一般地， n 维数组的格式为： array[ 下标类型 1，下标类型 2， …，下标类型 n] of 元素类型； 其中，下标类型的个数即数组的维数，且说明了每个下标的类型及取值范围。 二、多维数组元素的引用 多维数组的数组元素引用与一维数组元素引用类似，区别在于多维数组元素的引用必须给出多个下标。 引用的格式为： 数组名 [ 下标 1,下标 2, …,下标 n] 说明：显然，每个下标表达式的类型应与对应的下标类型一致，且取值不超出下标类型所指定的范围。 例如 ,设有说明 : type matrix=array[1..5,1..4]of integer; var a:matrix; 则表示 a 是二维数组，共有 5*4=20 个元素，它们是： a 〔1， 1 〕a 〔1，2 〕a 〔1，3 〕a 〔1，4 〕 a 〔2， 1 〕a 〔2 ，2 〕a 〔2 ，3 〕a 〔2，4 〕 a 〔3， 1 〕a 〔3 ，2 〕a 〔3 ，3 〕a 〔3，4 〕 a 〔4， 1 〕a 〔4 ，2 〕a 〔4 ，3 〕a 〔4，4 〕 a 〔5， 1 〕a 〔5 ，2 〕a 〔5 ，3 〕a 〔5，4 〕 因此可以看成一个矩阵， a 〔4 ，2 〕即表示第 4 行、第 2 列的元素。由于计算机的存储器是一维的，要把 二维数组的元素存放到存储器中， pascal 是按行（第一个下标）的次序存放，即按 a 〔1，1 〕a 〔1 ，2 〕a 〔1 ，3 〕a 〔1，4 〕a 〔2 ，1 〕… ，a 〔5 ，4 〕的次序存放于存储器中某一组连续的存储单元之内。 对于整个二维数组的元素引用时 ,大多采用二重循环来实现。 如：给如上说明的二维数组 a 进行赋值 :a[i,j]=i*j 。 for i:=1 to 5 do for j:=1 to 4 do a[i,j]:=i*j; 对二维数组的输入与输出也同样可用二重循环来实现 : for i:=1 to 5 do begin for j:=1 to 4 do read(a[i,j]); readln; end; for i:=1 to 5 do begin for j:=1 to 4 do write(a[i,j]:5); writeln; end; 三、多维数组的应用示例 例 1 设有一程序 : program ex5_3; const n=3; type matrix=array[1..n,1..n]of integer; var a:matrix; i,j:1..n; begin for i:=1 to n do begin for j:=1 to n do read(a[i,j]); readln; end; for i:=1 to n do begin for j:=1 to n do write(a[j,i]:5); writeln; end; end. 且运行程序时的输入为 : 2 □ 1□3←┘ 3□3□ 1←┘ 1□2 □ 1←┘ 则程序的输出应是 : 2 □3□ 1 1□3□2 3□ 1□