(4)复型常量,简称复数。在FORTRAN中,用一对圆括弧括起来的两个实数表示。如(12.0,-6.E2)表示复数12.0-600.0i
(5)逻辑型常量。FORTRAN中的逻辑型常量有两个值:.TRUE.与.FALSE.
(6)字符型常量,也称为字符串。计算机系统使用的若干个字符,用一对单引号括起来后就作为字符串。
2.变量指在程序运行期间可以改变的量。
(1)变量的类型与常量相对应,分为整型变量、实型变量、双精度实型变量、复型变量、逻辑型变量与字符串变量。
(2)变量名按一定的规则命名。在FORTRAN中,变量名采用1至6个字符(数字或字母),其中第一个字符必须是字母。FORTRAN 77规定,变量名书写时不区别字母的
大写与小写,例如ABc与aBC都指同一个变量。
(3)变量类型的说明方法。
1)I-N隐含规则。在程序单位中没有其他说明时,以字母I,J,K,L,M,N中的
任一个字母打头命名的变量都是整型变量。
2)用类型说明语句规定变量类型。例如:
INTEGER A,COUNT
REAL ICOUNT
DOUBLEPRECISION XING
COMPLEX DUP
LOGICAL JUG
CHARACTER FILENM
分别表示变量A,COUNT为整型,ICOUNT为实型,XING为双精度实型,DUP为复制,JUG为逻辑型,FILENM为字符型变量,其长度为10个字符。
3)用隐含说明语句IMPLICIT语句,可以将程序单位中以某一字母开头的所有变量
指定为所需类型。例如:
IMPLICIT INTEGER(A,C),REAL(1—K)
指定了以A与C字母开头的所有变量都是整型变量,以字母I至K开头的所有变量为实型变量。
类型说明语句和隐含说明语句只在本程序单位中有效;他们必须放在程序单位所有可执行语句的前面,而IMPLICIT语句又必须在所有的类型说明语句的前面。确定变量类型的三种方法中,类型说明语句的优先级最高,I-N规则的优先级最低。
(四)数组
1.数组的定义
有些互相关联的数据,作为单个变量处理并不方便。程序设计语言通常把这种相互关联的数据按一定的顺序关系组成一个集合,该集合称为数组;组成数组的基本单元称为数组元素,每一个数组元素对应一个数据.在FORTRAN中,使用数组前必须对数组进行定义,包括对数组命名;确定数组的类型;确定数组的维数及大小;指出数组各维下标的下限与上限。
数组的命名规则与变量的命名规则相同。
确定数组类型、维数及其大小的方法有以下两种。
(1)用类型说明语句定义数组。例如:
INTEGER X(-2:30),XYZ(1:20,0:15)
定义了两个整型数组。其中X称为一维数组,下标的下限与上限分别为-2与30,即这个一维数组共有30-(-2)+1=33个元素,它们分别为:X(-2),X(-1),X(0),X(1),…,X(30);XYZ称为二维数组,第一个下标的下限与上限分别为1与20,第二个下标的下限与上限分别为0与15,即这个二维数组共有(20-1+1)×(15-0+1)=20×16=320个整型元素,它们分别为:
XYZ(1,0),XYZ(1,1),…,XYZ(1,15)
…………
XYZ(20,0),XYZ(20,1),…,XYZ(20,15)
字符型数组必须用类型说明语句定义。例如:
CHARACTER OUT(10)
数组OUT每个元素的长度都是8,即每个元素都可以存放8个字符。
(2)用DIMENSION语句定义数组。这时,数组的类型按隐含规则确定,或者可以用类型说明语句再次说明其类型。例如:
DIMENSION IM(-1:10),IA(0:100,-2:0),X(1:5)
REAL IA
INTEGER X
其中,IM为一维整型数组,IA为2维实型数组,X为一维整型数组。
当数组的下标下限为1时,可以省略说明下标下限。例如,下列数组说明
DIMENSIONA(100),B(5,5)等价于DIMENSIONA(1:100),B(1:5,1:5)
目前在许多微机上使用的FORTRAN 77子集中,数组的下标下限只允许为1,并且也只允许用省略下限的数组说明。