9.197 NINT — Ближайшее целое число

Описание:

NINT(A) округляет свой аргумент до ближайшего целого числа.

Стандарт:

Fortran 77 и более поздние версии, с аргументом KIND Fortran 90 и более поздние версии

Класс:

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

Синтаксис:

RESULT = NINT(A [, KIND])

Аргументы:

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

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

Возвращает A с дробной частью его величины, устранённой путём округления до ближайшего целого числа и сохранением знака, преобразованного в INTEGER с параметром рода по умолчанию.

Пример:

program test_nint
  real(4) x4
  real(8) x8
  x4 = 1.234E0_4
  x8 = 4.321_8
  print *, nint(x4), idnint(x8)
end program test_nint

Названия:

Имя	Аргумент	Тип результата	Стандарт
NINT(A)	REAL(4) A	INTEGER	Fortran 95 и более поздние версии
IDNINT(A)	REAL(8) A	INTEGER	Fortran 95 и более поздние версии

См. также:

CEILING, FLOOR