文档介绍：第五章 FORTRAN 90数据类型
整型数据
实型数据
复型数据
字符型数据
逻辑型数据
一、整型数据
整型变量的说明:
INTEGER [ (类别参数值) ] [ [ ,属性列表] :: ] 变量列表
其中类别参数值取1,2,4,变量的属性是指被说明对象的所属性质。一个对象被说明具有某一属性时,就使该对象具有某种附加功能、特殊的使用方式与适用范围。属性的种类有很多,这里介绍两种最常见属性的说明格式:
INTEGER, PARAMETER :: I=5,J=24
INTERGER, DIMENSION(1:10) :: A
例 i数列前30项之和。分析:本例中,i数列前30项之和是一个很大的数,已经超过了类别参数为2的整数的取值范围,只能采用类别参数为4整数。如果数超过类别参数为4的整数取值范围,就只能采用实型数据来处理。
二、实型数据
实型变量的说明:
REAL [ ( [KIND = ] 类别参数值) ] [ [ ,属性列表] :: ] 变量列表
单精度用REAL(4)定义,双精度用REAL(8)或DOUBLE PRECISION定义。缺省的类别值为4,即为单精度。
例利用双精度求:
 
直到最后一项的绝对值小于10-15为止。
三、复型数据
将两个实数用逗号分隔,再用括号括起来就构成了一个FORTRAN复型常量。其中第一个实数称为复数的实部,第二个实数称为复数的虚部。
复型变量的说明:
COMPLEX [ (类别值) ] [ [ ,属性列表] :: ] 变量列表
如果实部和虚部都不是常数,而是表达式,则应该用CMPLX函数将实部和虚部组成复型数据再赋给复型变量。例如 C = CMPLX(*A, +B)
例有一线段AB,A的坐标为(1,1),B的坐标为(,),求AB的长度以及黄金分隔点C的坐标。。
分析:A,B的坐标可用复数表示:即A为(,),B为(,)。AB的长度就是(A-B)的模。可用ABS函数直接求出复数的模。黄金分隔点C的坐标为A+×(B-A)。
四、字符型数据

字符型常量又叫字符串常量,它是用单撇号或双撇号括起来的字符序列。例如,″ABCD″、′CHINA′、′12345678′等都是FORTRAN字符型常量。
当字符串中又含有单撇号时,例如要将I′M A STUDENT作为一个字符串来处理,为了区分′是字符串中的字符还是定界符,可采用两种方式表示:
″I′M A STUDENT″
′I′′M A STUDENT′
前者用双撇号作定界符,后者用单撇号作定界符,而将字符串的单撇号用两个单撇号表示,系统会自动将其处理为字符串的一个单撇号字符。

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=′FORTR