命名常量和文字
有两种类型的常量 -
文字常量有一个值,但没有名称。
例如,以下是文字常量 -
类型 |
例子 |
整数常量 |
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) |
逻辑常数 |
。真的。。错误的。 |
字符常量 |
"PQR" "a" "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