8.86 FLOOR — Функция целой части от числа

Описание:

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

Стандарт:

Fortran 95 и более поздние версии

Класс:

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

Синтаксис:

RESULT = FLOOR(A [, KIND])

Аргументы:

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

Значение результата:

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

Пример:

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

См. также:

CEILING, NINT