ＡＮＩＮＴ
copyright

green dotＡＮＩＮＴ

書式 ANINT(A[,KIND])
機能 ANINT：Aの小数点部分を四捨五入する。
引数
A ：実数型
KIND
(省略可能)		：整数型
戻り値 型は実数型である。KINDを指定したとき、種別型パラメタはKINDの指定に従う。
KINDを省略したとき、種別型パラメタは引数Aと同じである。

green dotサンプルプログラム

3.566, -3.14の小数点部分を切り捨てた値と小数点部分を四捨五入した値を求める。 
    REAL :: a,b
    a=3.566; b=-3.14
    WRITE(*,*) AINT(a),AINT(b)
    WRITE(*,*) ANINT(a),ANINT(b)


実行例

    3.00000…　-3.00000…
    4.00000…  -3.00000…
line-end