ANINT

要素別処理組込み関数 (総称)：最も近い整数を計算します。

形式

result = ANINT (a [, kind] )

a
(入力) 実数型。

kind
(省略可能，入力) スカラ整数初期値式。

結果

結果の型は実数型です。kind が存在する場合，種別パラメタは kind によって指定されたものになります。kind が存在しなければ，a の種別パラメタが使用されます。a がゼロよりも大きければ，ANINT (a) の値は，値 AINT (a + 0.5) となります。a がゼロ以下ならば，ANINT (a) の値は AINT (a - 0.5) となります。

互換性

CONSOLE STANDARD GRAPHICS QUICKWIN GRAPHICS WINDOWS DLL LIB

個別名	引数の型	結果の型
ANINT	REAL(4)	REAL(4)
DNINT	REAL(8)	REAL(8)
QNINT 1	REAL(16)	REAL(16)
1 VMS と U*X

丸めよりも切り捨てを行うには，AINT を使います。

関連情報

NINT

例

		REAL r1, r2
		r1 = ANINT(2.6)		! 値 3.0 を返します。
		r2 = ANINT(-2.6)	! 値 -3.0 を返します。

	!	ANINT.F90 は，計算を行い，購入金額に税金を追加します。
		REAL amount, taxrate, tax, total
		taxrate = 0.081
		amount = 12.99
		tax = ANINT (amount * taxrate * 100.0) / 100.0
		total = amount + tax
		WRITE (*, 100) amount, tax, total
	100	FORMAT ( 1X, 'AMOUNT', F7.2 / &
			 1X, 'TAX ', F7.2 / &
			 1X, 'TOTAL ', F7.2) 
		END

ANINT (3.456) の値は 3.0 です。

ANINT (-2.798) の値は -3.0 です。