Fortran - 常量

常量是指程序在其执行过程中无法更改的固定值。这些固定值也称为字面量。

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

常量与常规变量的处理方式相同，只是在定义后无法修改其值。

命名常量和字面量

常量有两种类型：

• 字面常量
• 命名常量

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

例如，以下是字面常量：

命名常量既有值也有名称。

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

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