04 定义变量

FORTRAN77确定变量类型的方法：I-N规则、类型说明语句、IMPLICIT语句指定。

---

1 I-N规则

若无其他类型说明，凡是以I、J、K、L、M、N开头的变量是整型变量，以其他字母开头的则是实型变量。

I、J、Kiss、L1等是整型变量
A、c、z、xv 等是实型变量

显然，这种规则只能定义整型和实型变量，不能确定其他类型的变量。

2 类型说明语句

INTEGER、REAL、DOUBLE PRECISION、COMPLEX、LOGICAL、CHARACTER分别用来定义整型、实型、双精度型、复型、逻辑型、字符型变量。

integer a, b, c
real d, e, f
double precision h, i, j
complex k, l, m
logical n, o, p
character*5 q, r, s*2  q, r为长度为5的字符型变量，s是长度为2的字符型变量

3 IMPLICIT语句

implicit语句可以指定以某一些字母开头的变量全部为某一类型。

implicit integer(A,C),(E-H)  以A、C、E、F、G、H开头的变量为整型
implicit real(I,J)  以I、J开头的为实型变量
implicit character*5(P-T)  以P、Q、R、S、T开头的为长度为5的字符型变量

定义符号常量时，类型说明需在前面

real PI
parameter(PI=3.141)

在三种定义变量类型的方法中，类型说明优先级最高，I-N规则最低。

类型说明语句在执行语句前，IMPLICIT语句在类型说明语句之前。

IMPLICIT NONE 可以在程序中禁用I-N规则。