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