9.58 CEILING — Функция целого потолка

Описание:

CEILING(A) возвращает наименьшее целое число, большее или равное A.

Стандарт:

Fortran 95 и позднее

Класс:

Элементарная функция

Синтаксис:

RESULT = CEILING(A [, KIND])

Аргументы:

A	Тип должен быть REAL.
KIND	(Необязательно) Выражение инициализации, указывающее параметр вида результата.

Значение возврата:

Значение возврата имеет тип INTEGER(KIND) если KIND присутствует и тип по умолчанию INTEGER в противном случае.

Пример:

program test_ceiling
    real :: x = 63.29
    real :: y = -63.59
    print *, ceiling(x) ! returns 64
    print *, ceiling(y) ! returns -63
end program test_ceiling

См. также:

FLOOR, NINT