Fortran-定数

定数は、プログラムが実行中に変更できない固定値を参照します。これらの固定値は*リテラル*とも呼ばれます。

定数は、整数定数、浮動定数、文字定数、複素数定数、または文字列リテラルなどの基本的なデータ型のいずれかです。論理定数は2つのみです：* .true。および .false。*

定数は、通常の変数と同様に扱われますが、定義後に値を変更することはできません。

名前付き定数とリテラル

定数には2種類あります-

リテラル定数 *名前付き定数

リテラル定数には値がありますが、名前はありません。

たとえば、リテラル定数は次のとおりです-

Type	Example
Integer constants	0 1 -1 300 123456789
Real constants	0.0 1.0 -1.0 123.456 7.1E+10 -52.715E-30
Complex constants	(0.0, 0.0) (-123.456E+30, 987.654E-29)
Logical constants	.true. .false.
Character constants	"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

Fortran-constants

Fortran-定数

名前付き定数とリテラル

例