Fortran的常量
常数指的是程序不能在执行期间改变的固定值。这些固定值也被称为文字 。
常量可以是任何基本的数据类型,如整型常量,一个浮点常量,字符常量,复杂的常量或字符串文本。只有两个逻辑常量:.TRUE。和.FALSE。
该常量将被视为就像普通变量,但它们的值不能将其定义后进行修改。
命名常量和文字
有两种类型的常量:
- 字面常量
- 命名常量
文字常量有值,但没有名字。
例如,以下是文字常量:
类型 | 例 |
---|---|
整型常量 | 01-1 300 123456789 |
实常数 | 0.0 1.0 -1.0 123.456 7.1E + 10 -52.715E-30 |
复常数 | (0.0,0.0)(-123.456E + 30,987.654E-29) |
逻辑常量 | 。真正。 。假。 |
字符常量 | “PQR”“一”“123'abc $%#@!” “一帖”“” “PQR''A''123”ABC $%#@! '撇号''' |
命名常量的值以及名称。
命名常量应当在程序或过程的开始进行声明,就像一个变量的类型声明,表明其名称和类型。命名常量声明的参数属性。例如,
real, parameter :: pi = 3.1415927
例
下面的程序计算位移,由于在重力作用下垂直运动。
program gravitationalDisp ! this program calculates vertical motion under gravity implicit none ! gravitational acceleration real, parameter :: g = 9.81 ! variable declaration real :: s ! displacement real :: t ! time real :: u ! initial speed ! assigning values t = 5.0 u = 50 ! displacement s = u * t - g * (t**2) / 2 ! output print *, "Time = ", t print *, 'Displacement = ',s end program gravitationalDisp
当上述代码被编译和执行时,它产生了以下结果:
Time = 5.00000000 Displacement = 127.374992