8.183 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