fortran 第7章.pptVIP

Fortran 95 程序设计 第七章 数 组 §7-1 基本使用 数组（ARRAY) :可以用来配置一大块的内存空间，存储同一种类型的数据。配合循环等，精简程序代码 数组为变量使用前要声明 ： §7-1-1 一维数组 §7-1-1 一维数组 1）声明：integer :: student(students) 或： integer :: student(3) 2）赋值 student(1)=80 student(2)=85 3）运算 数组的元素可当作变量 a=student(1)+student(2) §7-1-1 一维数组 4）数组元素的索引值可为整型变量 I=2 a=x+student(I) 5）要避免数组应用时，超过数组范围 read(*,*) I write(*,*) student(i) §7-1-1 一维数组 Fortran中有很多不同语法可以用来声明数组 Integer a(10) Integer, dimension(10) :: a Integer a ! Fortran 77 中的用法， 先声明a是整型 dimension a(10) !再声明a是大小为10的数组 数组还可以用于自定义的数据类型 Type :: Person real :: height, weight End Type Type(person) :: a(10) !用person这个新类型来声明数组 …… …… a(2)%height=170. !变量后同样用%来使用person类型中的元素 a(2)%weight=70. §7-1-2 二维数组 二维数组举例： 声明： Integer a(10，10) Integer, dimension(10, 10) :: a Integer a ! 这是fortran 77的做法， !先声明a是整型， dimension a(10, 10) !再声明a是长度为10的数组 §7-1-2 二维数组 5个班级，每班5位学生，保存成绩；查询成绩 输入两个2×2的矩阵的值，并相加 §多维数组： 声明： Integer a(D1, D2, ……, Dn) ! n维数组 FORTRAN最多可声明高达7维的数组 a(I1, I2, …, In) ， 使用n维数组时，要给出n个坐标值 通常多维数组需要和多重循环结合使用。 §多维数组： 输入两个2×2的矩阵的值，并相加 §7-1-4 另类的数组说明 在没有特别赋值的情况下， 数组的索引值都是从1开始，例： Integer a(5) ! 能使用的是 a(1), a(2), a(3), a(4) , a(5) Integer a(0:5) ! 能使用的是 a(0), a(1), a(2), a(3), a(4) , a(5) Integer a(-3: 3) ! 能使用的是 a(-3), a(-2), a(-1), a(0), ！ a(1), a(2), a(3) Integer a(5, 0:3) ! 能使用的是a(1~5, 0~3)的元素 Integer b(2:3, -2:1) ! 能使用的是b(2~3, -2~1)的元素 $ 7-2 数组内容的设置 §7-2-1赋初值 1）采用DATA , 例： Integer A（5） DATA A /1, 2, 3, 4, 5/ !a(1)=1, a(2)=2, a(3)=3, a(4)=4, a(5)=5 要全部赋初值 §7-2-1赋初值 2)可以用*来表示数据的重复 Integer a(5) Data A/1, 2, 3*3/ ！a(1)=1, a(2)=2, a(3)=3, a(4)=3, a(5)=3 §7-2-1赋初值 3)可以用“隐含式”的循环功能可以用来设置数组的初值： Integer A(5) Integer I Data( A(I), I=2, 4)/2, 3, 4/ !I 会从2到4， 数组元素依 照顺序到后面取数字 ！ a(2)=2, a(3)=3, a(4)