Fortran常量 - Fortran教程
常量指的是该程序不能在其执行期间改变的固定值。这些固定的值也被称为文字。
常量可以是任何像一个整数的基本数据类型的常量,浮点常量,字符常量,复杂的常量或一个字符串字面量。只有两个逻辑常量:.true. 和 .false.
常量被视为就像普通的变量,但它们的值无法定义后进行修改。
命名常量和文字
有两种类型的常量:
- 字面常量
- 命名常量
一个字面常量有值,但没有名字。
例如,以下是文字常量:
类型 | 例子 |
---|---|
整型常量 | 0 1 -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) |
逻辑常量 | .true. .false. |
字符常量 | "PQR" "a" "123'abc$%#@!"" a quote "" "'PQR' 'a' '123"abc$%#@!'' an apostrophe '' ' |
命名常量的值和名称。
命名常量应该在程序或过程的开始声明,就像一个变量的类型声明,说明其名称和类型。命名常量与参数属性声明。例如,
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