[工学]fortran程序设计第7章.ppt

第七章 数组 数组是一种数据结构，每个数组代表一组具有同一类型的变量，把数组中所包含的变量称为数组元素。在程序中通过说明语句声明数组。例如： INTEGER A(1:6) 每个变量都在内存中占有一个独立的存储单元。例如： INTEGER A1, A2, A3, A4, A5, A6 这六个变量所代表的六个存储单元在内存中的位置是彼此独立、互不相关的。 从终端读入六个数放到这六个存储单元中，则需要用以下输入语句： READ (*, *) A1, A2, A3, A4, A5, A6 从这六个数中找出最小数，则需要以下一系列语句： MIN=A1 IF (A2 .LT. MIN) MIN=A2 IF (A3 .LT. MIN) MIN=A3 IF (A4 .LT. MIN) MIN=A4 IF (A5 .LT. MIN) MIN=A5 IF (A6 .LT. MIN) MIN=A6 数组是由一组相同类型的变量组成的，每个元素当然也在内存中占用一个存储单元。与A1、A2、…、A6不同的是，A数组的这六个存储单元在内存中是一个接着一个排列、彼此紧密相关的。数组名A是六个存储单元的总名字。 同一个数组中的各个元素用不同的下标来区别，它们的表示形式为A(1)、A(2)、A(3)、A(4)、A(5)、A(6)，下标放在紧跟在数组名后的一对圆括号内。在内存中A(2)元素的位置必定紧挨在A(1)之后，A(3)元素的位置紧挨在A(2)之后，其它依次类推。 只要给出数组名和下标值就可以确定该数组元素在内存中的位置从而对其进行存取。在程序中通过改变下标值的方法来引用数组中不同的存储单元。 例如，可以通过以下语句从终端给前面说明的A数组中的六个变量赋值： DO 10, I=1, 6 READ (*, *) A(I) 10 CONTINUE 通过以下语句找出它们之中最小的那个数： IP=1 MIN=A(IP) DO 20, I=2, 6 IF (A(I) .LT. MIN) THEN IP=I MIN=A(IP) END IF 20 CONTINUE 通过以上例子可以看到，数组的使用将使程序变得简洁、灵活、易读，它是程序设计中一种十分有用的工具。使用数组可以使许多复杂的算法得以实现，这些算法用简单变量是无法实现的。 7.1 数组的说明和数组元素的引用 使用数组必须在类型说明语句或在DIMENSION语句中先对数组进行说明。 说明数组的一般形式如下： 类型说明或DIMENSION 数组说明符, … 其中数组说明符的形式如下： 数组名 (维说明符, …) 维说明符的组成形式如下： 下标下界 : 下标上界 7.1.1 用类型语句说明数组 数组通常在类型说明语句中说明： REAL IA(1:10), ND(80:99), W(1:3, 1:2) INTEGER NUM(-1:0), A(0:2, 0:1, 0:3) 7.1.2 用DIMENSION语句说明数组 在上一小节中说明的IA、ND、W、NUM、A数组也可以用以下语句说明： DIMENSION IA(10), ND(80:99), W(3,2) DIMENSION NUM(-1:0), A(0:2,0:1,0:3) INTEGER A REAL IA, ND DIMENSION语句用来说明数组，数组的类型则根据数组名的第一个字母由隐含类型规则来决定，否则应该在类型语句中对数组名进行显示说明。例如，以上IA、ND是实型数组，所以应该在REAL语句中说明，而W则可以不在REAL语句中说明，因为按隐含类型规则，名字W的隐含类型就是实型；A数组（整型）应该在INTEGER语句中说明，而NUM数组则可以不必另行说明。 7.1.3 数组元素的引用 数组元素的引用形式： 数组名(下标, ...) 7.2 数组的逻辑结构和存储结构 7.3 数据的输入和输出 假定有以下数组说明语句： REAL W(3, 2) INTEGER A(10) 将以A数组和W数组为例介绍对数组进行输入和输出操作的三种方式。 7.3.1 利用DO循环对数组进行输入和输出 从终端键盘输入十个数，按顺序逐个放入A(1)到A(10)中 DO 10, I=1, 10 READ (*, *) A(I) 10 CONTINUE 把A(1)、A(3)、A(5)、A(7)、A(9)输出到终端屏幕上。 DO 20 I=1, 10,