当前位置: 首页 > 文档资料 > Fortran 中文教程 >

常量

优质
小牛编辑
130浏览
2023-12-01

常量是指程序在执行期间无法更改的固定值。这些固定值也称为literals

常量可以是任何基本数据类型,如整数常量,浮点常量,字符常量,复数常量或字符串文字。只有两个逻辑常量: .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 '' '

命名常量具有值和名称。

命名常量应在程序或过程的开头声明,就像变量类型声明一样,指示其名称和类型。使用parameter属性声明命名常量。例如,

real, parameter :: pi = 3.1415927

例子 (Example)

以下程序计算重力作用下垂直运动引起的位移。

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