第5章FORTRAN90数据类型.ppt
第五章第五章 FORTRAN 90数据类数据类型型 整型数据整型数据 实型数据实型数据 复型数据复型数据 字符型数据字符型数据 逻辑型数据逻辑型数据 一、整型数据一、整型数据 整型变量的说明：整型变量的说明：INTEGER (类别参数值类别参数值),属性列表属性列表 :变量列表变量列表 其中类别参数值取其中类别参数值取1,2,4，变量的属性是指被说明对象的所，变量的属性是指被说明对象的所属性质。一个对象被说明具有某一属性时，就使该对象具属性质。一个对象被说明具有某一属性时，就使该对象具有某种附加功能、特殊的使用方式与适用范围。属性的种有某种附加功能、特殊的使用方式与适用范围。属性的种类有很多，这里介绍两种最常见属性的说明格式：类有很多，这里介绍两种最常见属性的说明格式：INTEGER,PARAMETER:I=5,J=24INTERGER,DIMENSION(1:10):A例例 求求Fibonacci数列前数列前30项之和。项之和。分析：本例中，分析：本例中，Fibonacci数列前数列前30项之和是一个很大项之和是一个很大的数，已经超过了类别参数为的数，已经超过了类别参数为2的整数的取值范围，只能的整数的取值范围，只能采用类别参数为采用类别参数为4整数。如果数超过类别参数为整数。如果数超过类别参数为4的整数取的整数取值范围，就只能采用实型数据来处理。值范围，就只能采用实型数据来处理。二、实型数据二、实型数据 实型变量的说明：实型变量的说明：REAL (KIND=类别参数值类别参数值),属性列表属性列表:变量列变量列表表单精度用单精度用REAL(4)定义，双精度用定义，双精度用REAL(8)或或DOUBLE PRECISION定义。缺省的类别值为定义。缺省的类别值为4，即为单精度。，即为单精度。例例 利用双精度求：利用双精度求：直到最后一项的绝对值小于直到最后一项的绝对值小于1015为止。为止。7642531542313211ln7532xxxxxx三、复型数据三、复型数据 将两个实数用逗号分隔，再用括号括起来就构成了一个将两个实数用逗号分隔，再用括号括起来就构成了一个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 STUDENTIM A STUDENT前者用双撇号作定界符，后者用单撇号作定界符，而将前者用双撇号作定界符，后者用单撇号作定界符，而将字符串的单撇号用两个单撇号表示，系统会自动将其字符串的单撇号用两个单撇号表示，系统会自动将其处理为字符串的一个单撇号字符。处理为字符串的一个单撇号字符。2字符型变量字符型变量 CHARACTER(LEN=n1,KIND=n2),属性说明属性说明:变量变量列表列表 格式中的格式中的n1和和n2是一个整数和整型表达式，是一个整数和整型表达式，n1代表被说明变代表被说明变量的长度，量的长度，n2代表字符变量的类别参数，各项属性说明是代表字符变量的类别参数，各项属性说明是字符型变量有关属性的说明。字符型变量有关属性的说明。例如例如CHARACTER(LEN=25,KIND=2):A,B,CCHARACTER(LEN=8),DIMENSION(1:10):X,Y,ZCHARACTER(10),PARAMETER:NAME=FORTRAN_90 CHARACTER(15):ACHARACTER*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数据类型数据类型
