第5章FORTRAN90数据类型.ppt

第五章 FORTRAN 90数据类型,整型数据 实型数据 复型数据 字符型数据 逻辑型数据,一、整型数据,整型变量的说明： INTEGER (类别参数值 ) ,属性列表 : 变量列表 其中类别参数值取1,2,4，变量的属性是指被说明对象的所属性质。一个对象被说明具有某一属性时，就使该对象具有某种附加功能、特殊的使用方式与适用范围。属性的种类有很多，这里介绍两种最常见属性的说明格式： INTEGER, PARAMETER : I=5,J=24 INTERGER, DIMENSION(1:10) : A 例 求Fibonacci数列前30项之和。 分析：本例中，Fibonacci数列前30项之和是一个很大的数，已经超过了类别参数为2的整数的取值范围，只能采用类别参数为4整数。如果数超过类别参数为4的整数取值范围，就只能采用实型数据来处理。,二、实型数据,实型变量的说明： REAL ( KIND = 类别参数值) ,属性列表 : 变量列表 单精度用REAL(4)定义，双精度用REAL(8)或DOUBLE PRECISION定义。缺省的类别值为4，即为单精度。 例 利用双精度求： 直到最后一项的绝对值小于1015为止。,三、复型数据,将两个实数用逗号分隔，再用括号括起来就构成了一个FORTRAN复型常量。其中第一个实数称为复数的实部，第二个实数称为复数的虚部。 复型变量的说明： COMPLEX (类别值) ,属性列表 : 变量列表 如果实部和虚部都不是常数，而是表达式，则应该用CMPLX函数将实部和虚部组成复型数据再赋给复型变量。例如 C = CMPLX(3.0*A, 6.0+B) 例 有一线段AB，A的坐标为(1，1)，B的坐标为(4.5，4.5)，求AB的长度以及黄金分隔点C的坐标。黄金分割点在线段的0.618处。 分析：A，B的坐标可用复数表示：即A为(1.0，1.0)，B为(4.5，4.5)。AB的长度就是(A-B)的模。可用ABS函数直接求出复数的模。黄金分隔点C的坐标为A+0.618×(B-A)。,四、字符型数据,1字符型常量 字符型常量又叫字符串常量，它是用单撇号或双撇号括起来的字符序列。例如，ABCD、CHINA、12345678等都是FORTRAN字符型常量。 当字符串中又含有单撇号时，例如要将IM A STUDENT作为一个字符串来处理，为了区分是字符串中的字符还是定界符，可采用两种方式表示： IM A STUDENT IM A STUDENT 前者用双撇号作定界符，后者用单撇号作定界符，而将字符串的单撇号用两个单撇号表示，系统会自动将其处理为字符串的一个单撇号字符。,2字符型变量 CHARACTER(LEN=n1,KIND=n2),属性说明 : 变量列表 格式中的n1和n2是一个整数和整型表达式，n1代表被说明变量的长度，n2代表字符变量的类别参数，各项属性说明是字符型变量有关属性的说明。 例如 CHARACTER(LEN=25,KIND=2):A,B,C CHARACTER(LEN=8),DIMENSION(1:10):X,Y,Z CHARACTER(10),PARAMETER:NAME=FORTRAN_90 CHARACTER(15):A CHARACTER*15:A CHARACTER(15):A,B*8,C*5,D,E,3子字符串 字符变量名(m:n) 其中，m和n是整数和整型表达式，表示子字符串在字符串中的起止位置，该子字符串的长度为n-m+1(nm1)。 4字符表达式 字符运算符只有一个，就是字符连接符/，它是由两个斜杠组合而成的，其作用是将两个字符型数据连接起来，成为一个字符型数据。 5字符关系表达式 两个字符串比较时，将两个字符串中的字符自左向右这个进行比较。若所有字符完全相同，则两表达式相等。否则，以第一次出现不同字符的比较结果为准。,6用于字符处理的内部函数 求字符串长度函数(LEN和LEN_TRIM) 子串位置函数(INDEX) 字符与字符序号相互转化函数 7. 字符处理应用举例 例1 在读入的一批单词中，把以字母B开头的打印出来，直到输入ZZZ结束。 例2 翻译密码：为了保密，常不采用明码电文，而用密码电文，按事先约定的规律将一个字符转换为另一个字符。收报人则按相反的规律转换得到原来的字符。例如，将字母AF，BG， C H，即将一个字母变成其后第五个字母。,五、逻辑型数据,逻辑常量只有真和假两种值：.TRUE.和.FALSE.。变量说明的格式为： LOGICAL (类别值 ) ,属性列表 : 变量列表 例 当某点的X，Y坐标落在四个方块内和方块边上时，Z=0，如在方块外，Z=3。,实验六 FORTRAN数据类型,