ＣＥＩＬＩＮＧ
copyright

green dotＣＥＩＬＩＮＧ

書式 CEILING(A)
機能 CEILING：A以上で最小の整数を求める。
引数 A：実数型
戻り値 型、種別型パラメタは基本整数型である。

green dotサンプルプログラム

-3.5, 0.0, 3.5の数値に対し、その数値以上で最小と最大の整数を求める。 
    REAL :: a,b,z
    a=-3.5; z=0.0; b=3.5
    WRITE(*,*) CEILING(a),CEILING(z),CEILING(b)
    WRITE(*,*) FLOOR(a),FLOOR(z),FLOOR(b)


実行例

    -3 0 4
    -4 0 3
line-end