Fortran 声明的注意事项

implicit none

让每个变量必须显示声明。

parameter 常数声明

常数声明的两种方法

program parameter

implicit none

real a
real , parameter :: b =  3.15

parameter(a=3.14)

write(*, '(3x, f5.2)') a
write(*, '(3x, f5.2)') b

end

使用 parameter 作为形容词来限定 变量声明时候，必须要 有 两个冒号，表示 形容词已经形容完毕。 这是f90里新加入的。

变量赋初值时候，可以直接在声明后直接赋值，这时不能少了 冒号 如

integer ::i=3

Fortran 77 要使用 data 命令来 设置初值。

用两个 斜杠包住 要设置的值。

data会依照顺序来设置 初值。

如：

program parameter

implicit none

real a
integer b
character *(20)str

data a,b,str  /3.14, 100 , 'hello'/

write(*, *) a,b,str

end

equivalence 等价声明

类似引用类型。 两个变量使用一块内存。

声明部分的 位置：最前面。

当出现 计算和输出输入命令之后， 就不能再写 声明语句了。 和C语言一样。

data命令也算是 声明的一部分。