Fortran - 常量

常量是指程序在执行过程中不能改变的固定值。 这些固定值也称为文字。

常量可以是任何基本数据类型，例如整型常量、浮点常量、字符常量、复数常量或字符串文字。 只有两个逻辑常量:.true. 和 .false.

常量的处理方式与常规变量一样，只是它们的值在定义后不能修改。

命名常量和文字

常量有两种类型 −

• 文字常量
• 命名常量

文字常量有值，但没有名称。

例如，以下是文字常量 −

命名常量具有值和名称。

命名常量应该在程序或过程的开头声明，就像变量类型声明一样，指示其名称和类型。 命名常量是用参数属性声明的。 例如，

real, parameter :: pi = 3.1415927

示例

以下程序计算重力作用下垂直运动产生的位移。

program gravitationalDisp

! 该程序计算重力下的垂直运动
implicit none  

   ! 重力加速度
   real, parameter :: g = 9.81   
   
   ! variable declaration
   real :: s ! displacement   
   real :: t ! time  
   real :: u ! initial speed  
   
   ! 赋值
   t = 5.0   
   u = 50  
   
   ! 移位
   s = u * t - g * (t**2) / 2  
   
   ! 输出
   print *, "Time = ", t
   print *, 'Displacement = ',s  
   
end program gravitationalDisp

当上面的代码被编译并执行时，会产生以下结果 −

Time = 5.00000000    
Displacement = 127.374992