Fortran - 常量

  • 简述

    常量是指程序在执行过程中不能改变的固定值。这些固定值也称为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)
    逻辑常数 。真的。。错误的。
    字符常量
    "PQR" "a" "123'abc$%#@!"
    " 一个报价 "" "
    'PQR' 'a' '123"abc$%#@!'
    '一个撇号'''
    命名常量具有值和名称。
    命名常量应该在程序或过程的开头声明,就像变量类型声明一样,表明它的名称和类型。命名常量使用参数属性声明。例如,
    
    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