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