Fortran的常量

常數(shù)指的是程序不能在執(zhí)行期間改變的固定值。這些固定值也被稱為文字 。

常量可以是任何基本的數(shù)據(jù)類型，如整型常量，一個(gè)浮點(diǎn)常量，字符常量，復(fù)雜的常量或字符串文本。只有兩個(gè)邏輯常量：.TRUE。和.FALSE。

該常量將被視為就像普通變量，但它們的值不能將其定義后進(jìn)行修改。

命名常量和文字

有兩種類型的常量：

• 字面常量
• 命名常量

文字常量有值，但沒有名字。

例如，以下是文字常量：

命名常量的值以及名稱。

命名常量應(yīng)當(dāng)在程序或過程的開始進(jìn)行聲明，就像一個(gè)變量的類型聲明，表明其名稱和類型。命名常量聲明的參數(shù)屬性。例如，

real, parameter :: pi = 3.1415927

例

下面的程序計(jì)算位移，由于在重力作用下垂直運(yùn)動。

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

當(dāng)上述代碼被編譯和執(zhí)行時(shí)，它產(chǎn)生了以下結(jié)果：

Time = 5.00000000    
Displacement = 127.374992