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