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命令也算是 声明的一部分。