05章-FORTRAN90数据类型.pptVIP

第五章 FORTRAN 90数据类型 整型数据 实型数据 复型数据 字符型数据 逻辑型数据 5.1 数据类型的概念 整型 实型 复型 逻辑型 字符型 数据类型的性质 (1)类型的名称 (2)允许值的集合 (3)允许值(常量)的表示方法 (4)操作这些值的运算的集合 5.2 整型数据 在FORTRAN语言中，整型值的集合是数学上整数的一个子集。每种方法用类别类型参数来区分。整型常量的表示形式为一个数字串，并在数字串后有一个可任选的下划线后再跟类别类型参数。例如，373、-1024、35792、0、32_24 整型数据类型的字节数和取值范围 在FORTRAN90中，还可以使用二进制、八进制和十六进制整型常量，但它只能用于DATA语句中。 整型变量的说明 基本格式为： 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.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.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)。 复型数据的类别类型参数是用于说明实部和虚部这两个实型数据的类别类型。 5.4.2 复型变量 COMPLEX [ ( [KIND = ] 类别值) ] [ [ ,属性列表] :: ] 变量列表 COMPLEX Z1,Z2 COMPLEX(4) :: COM_VAL COMPLEX(8) :: CZ, CQ CZ = (3.0, 6.3) CQ = (8.76E+5, -67.8E-3) 如果实部和虚部都不是常数，而是表达式，则应该用CMPLX函数将实部和虚部组成复型数据再赋给复型变量。 例如 C = CMPLX(3.0*A, 6.0+B) 例5.5 有一线段AB，A的坐标为(1，1)，B的坐标为(4.5，4.5)，如图5.2所示。求AB的长度，以及黄金分隔点C的坐标。黄金分割点在线段的0.618处。 分析：A，B的坐标可用复数表示：即A为(1.0，1.0)，B为(4.5，4.5)。AB的长度就是(A-B)的模，从图中可以明显地看到，AB的长度，可用ABS函数直接求出复数的模。黄金分隔点C的坐标为A+0.618×(B-A)。 COMPLEX::A,B,C REAL::L READ*,A,B C=A+0.618*(B-A) L=ABS(A-B) PRINT*,′L=′,L PRINT*,′C=′,C END 5.5 字符型数据 5.5.1 字符型常量 字符型常量又叫字符串常量，它是用单撇号或双撇号括起来的字符序列。″ABCD″、′CHINA′、′123′ 当字符串中又含有单撇号时，例如要将I′M A STUDENT作为一个字符串来处理，为了区分′是字符串中的字符还是定界符，可采用两种方式表示： ″I′M A STUDENT″ ′