fortran第7章1.ppt

Fortran 90 Visual Fortran 90 程序设计§ 一维数组§ 多维数组§ 数组运算§ 数组作为过程哑元§ 程序举例 Fortran 90 简单变量是用来存储一个数据数组是用来存储一批类型相同的被称为元素的有序数据例: 1,3,5,7,9 例: 3个学生 4门课程的成绩 98,89,88, 78 ,67,87,66 67 ,75,88,88 一维数组:一行或一列数据二维数组:一页表格三维数组:若干页表格存储在数组 A中存储在数组 B中变量与数组的区别变量与数组的区别§ § 数组数组的分类数组的分类维数最多可用到七维一维二维 Fortran 90 数组名:统称了一批数据数组元素:是数组中某一个数据的名称数组元素的写法: 一维数组: 数组名(下标表达式) 数组元素与下标数组元素与下标二维数组: 数组名(行下标表达式,列下标表达式) 三维数组: 数组名(行下标表达式,列下标表达式, 页下标表达式) 注意:下标表达式值自动取整数。下标值可正、可负、可为零。下标就是序号 Fortran 90 例1:1,3,5,7,9 存储在数组 A中①设1为第一个元素,数组 A的各元素为: A(1)、 A(2)、 A(3)、 A(4)、 A(5) ②设1为第 0个元素,数组 A的各元素为: A(0)、 A(1)、 A(2)、 A(3)、 A(4) ③设1为第-1个元素,数组 A的各元素为: A( -1)、 A(0)、 A(1)、 A(2)、 A(3) 例2:98,89,88, 存储在数组 B中 78,67,87,66 67 ,75,88,88 设表中行号为 1,2,3,列号为 1,2,3,4 则78为B(2,1)75为B(3,2) Fortran 90 程序中所有数组要先说明类型、名字、大小, 再使用说明方法一:用类型说明语句例: INTEGER,DIMENSION(1:5)::A,B(-1:2) ,C 数组说明数组说明 DIMENSION 属性统一说明大小 DIMENSION 属性统一说明大小名字后个别说明大小个别优于统一名字后个别说明大小个别优于统一 REAL(4),DIMENSION(1:3,1:4)::B=0 数组说明的一般格式: 类型[([ 长度说明],[ 种别说明])],Dimension( 大小)[, 其它属性说明]::数组名 1[= 初值][,数组名 2[= 初值]……] Fortran 90 例: INTEGER,DIMENSION(1:5)::A,B(-1:2) ,C REAL(4),DIMENSION(1:3,1:4)::B=0 1、大小:须写明维数,维界维数——逗号分隔每维维界—— d1:d2 , 下界 d1 ,上界 d2 。 2、维长: d2-d1+1 3、元素个数:各维维长的乘积 4、形状:各维维长的序列数组说明的基本概念数组说明的基本概念维数、维长 Fortran 90 1、下界 d1 的值由用户规定, 如为 1,说明时可省略不写例: REAL,DIMENSION(2 , 3) :: A 2、必须满足 d1<=d2 ,否则数组元素个数为零例: REAL , DIMENSION(5:1)::C 3、数组不得重复说明例: INTEGER,DIMENSION(2)::A INTEGER,DIMENSION(2,3)::A 数组说明的注意点数组说明的注意点 4、数组元素的下标取值必须在相应的维界偶范围内编译不报错, 值难以预测 Fortran 90 1、主程序中只能使用常界数组或动态数组: 常界数组:维界 d1 、 d2 只能取整常数表达式例: REAL,DIMENSION(1:5)::A 例: integer,PARAMETER::I=3 , M=8 integer,Dimension(I:M+1):: A 子程序中可使用常界数组,以及: 2、可调数组 3、假定形状数组 4、假定大小数组 5、动态数组数组的形式数组的形式 Fortran 90 引用数组的三种形式: 数组名统称数组中所有元素数组元素代表数组中的一个元素数组片段代表数组中若干个元素,且构成一个新的数组 数组片段 数组片段数组片段的表示方法数组片段的表示方法下标三元组法:每一维是下标三元组 e1:e2:e3 或常量例如二维数组:数组名(行三元组或常量,列三元组或常量) e1 :起始下标值,缺省为下界 d1 e2 :终止下标值,缺省为