FORTRAN语言第5章(共8章).ppt

第五章 FORTRAN 90数据类型 本章主要内容 数据类型的概念 整型数据 实型数据 复型数据 字符型数据 逻辑型数据 5.1 数据类型的概念 数据记录了现实世界中客观事物的属性，它包括两个方面：数据内容（值）和数据形式（型）。 数据内容就是数据的值； 数据形式就是数据的存储形式和操作使用方式，也称为数据类型。 整型 实型 复型 逻辑型 字符型 数据类型的性质： (1)类型的名称 (2)允许值的集合 (3)允许值(常量)的表示方法 (4)操作这些值的运算的集合 5.2 整型数据 在FORTRAN语言中，整型值的集合是数学上整数的一个子集。每种方法用类别类型参数来区分。整型常量的表示形式为一个数字串，并在数字串后有一个可任选的下划线后再跟类别类型参数。例如，373、-1024、35792、0、32_2、1992110235764803_8 整型数据类型的字节数和取值范围 在FORTRAN90中，还可以使用二进制、八进制和十六进制整型常量，但它只能用于DATA语句中。 二进制常量的形式是以字母B开头，后跟用一对撇号或双引号括起来的数字串，而且每个数字不是0就是1。例如 B1011101 八进制常量的形式是以字母O开头，后跟用一对撇号或双引号括起来的数字串，而且每个数字是0到7之间的一个数字。例如，O453、O376。 十六进制常量的形式是以字母Z开头，后跟用一对撇号或双引号括起来的数字串，而且每个数字是0到9或字母A到F之间的一个。例如，ZFFA9、 B9B45 。 INTEGER i, j, k DATA i /B110010/ DATA j /O62/ DATA k /Z32/ 整型变量的说明 基本格式为： INTEGER [ ( [ KIND = ] 类别参数值 ) ] [ [ ,属性列表 ] :: ] 变量列表 其中类别参数值取1,2,4 例：INTEGER I,TOTAL INTEGER(2) :: K,LIMIT INTEGER(KIND=4) :: MIN,MAX INTEGER*2 :: K,LIMIT INTEGER*4 :: MIN,MAX 变量的属性 属性是被说明对象的所属性质。一个对象被说明具有某一属性时，就使该对象具有某种附加功能、特殊的使用方式与适用范围。属性的种类有很多，这里介绍两种最常见属性的说明格式。 INTEGER, PARAMETER :: I=5,J=24 INTERGER, DIMENSION(1:10) :: A 例5.1 求Fibonacci数列前30项之和。Fibonacci数列的递推公式是： F0＝0 F1＝1 Fi＝Fi－1＋Fi－2 分析：设置两个变量来存放已求得的最后两项的值：F2保存已求得的最后一项（即Fi－1），F1保存前一项（即Fi－2）。这样，下一待求项就是F1和F2之和，我们将它赋值给F，然后将原来的F2赋值给F1，原来的F赋值给F2，又可以由F1和F2推出一个新的F，如此可以一直推下去。 本例中，Fibonacci数列前30项之和是一个很大的数，已经超过了类别参数为2的整数的取值范围，只能采用类别参数为4整数。如果数超过类别参数为4的整数取值范围，就只能采用实型数据来处理。 5.3 实型数据 FORTRAN用类别类型参数区分不同类型的实型数据。实型数据有单精度和双精度之分。单精度类别类型参数值为4，双精度数类别类型参数值为8。 一般形式为： 有效数E指数[ _类别参数] 有效数D指数 实型变量的说明 REAL [ ( [KIND = ] 类别参数值) ] [ [ ,属性列表] :: ] 变量列表 单精度用REAL(4)定义，双精度用REAL(8)或DOUBLE PRECISION定义。缺省的类别值为4，即为单精度。 REAL :: M12,AREA,LEN REAL(4) :: DX,DY REAL*4 :: DX,DY REAL(8) :: D_PRE,X REAL*8 :: D_PRE,X DOUBLE PRECISION :: D_PRE,X 例5.2 利用双精度按下面近似公式求 直到最后一项的绝对值小于10－15为止。 分析：首先找出累加项fn与fn-1的递推关系。不难推出 f0 =x 5.4 复型数据 5.4.1 复型常量 将两个实数用逗号分隔，再用括号括起来就构成了一个FORTRAN复型常量。其中第一个实数称为复数的实部，第二个实数称为复数的虚部。例如(1.25,0.4)、(1E2,-3.4)分别表示复数1.25+0.4i和100.0-3.4i，(1.0_4,4.2)。 复型数据的类别类型