Fortran常量

常量指的是該程序不能在其執行期間改變的固定值。這些固定的值也被稱爲文字。

常量可以是任何像一個整數的基本數據類型的常量，浮點常量，字符常量，複雜的常量或一個字符串字面量。只有兩個邏輯常量：.true. 和 .false.

常量被視爲就像普通的變量，但它們的值無法定義後進行修改。

命名常量和文字

有兩種類型的常量：

• 字面常量
• 命名常量

一個字面常量有值，但沒有名字。

例如，以下是文字常量：

類型

例子

整型常量

0 1 -1 300 123456789

實型常量

0.0 1.0 -1.0 123.456 7.1E+10 -52.715E-30

複數常量

(0.0, 0.0) (-123.456E+30, 987.654E-29)

邏輯常量

.true. .false.

字符常量

"PQR" "a" "123'abc$%#@!"

" a quote "" "

'PQR' 'a' '123"abc$%#@!'

' an apostrophe '' '

命名常量的值和名稱。

命名常量應該在程序或過程的開始聲明，就像一個變量的類型聲明，說明其名稱和類型。命名常量與參數屬性聲明。例如，

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