8.200 MOD — Функция остатка

Описание:

MOD(A,P) вычисляет остаток от деления A на P.

Стандарт:

Fortran 77 и более поздние версии, содержат перегрузки, являющиеся расширениями GNU

Класс:

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

Синтаксис:

RESULT = MOD(A, P)

Аргументы:

A	Должен быть скаляром типа INTEGER или REAL.
P	Должен быть скаляром того же типа и размера, что и A, и не равным нулю. (В качестве расширения GNU, допускаются аргументы разных размеров.)

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

Значение результата — это результат A - (INT(A/P) * P). Тип и размер значения результата совпадают с типами и размерами аргументов. Возвращаемое значение имеет тот же знак, что и A, и величину меньше, чем величина P. (В качестве расширения GNU, размер — это наибольший размер фактических аргументов.)

Пример:

program test_mod
  print *, mod(17,3)
  print *, mod(17.5,5.5)
  print *, mod(17.5d0,5.5)
  print *, mod(17.5,5.5d0)

  print *, mod(-17,3)
  print *, mod(-17.5,5.5)
  print *, mod(-17.5d0,5.5)
  print *, mod(-17.5,5.5d0)

  print *, mod(17,-3)
  print *, mod(17.5,-5.5)
  print *, mod(17.5d0,-5.5)
  print *, mod(17.5,-5.5d0)
end program test_mod

Указанные имена:

Имя	Аргументы	Тип результата	Стандарт
MOD(A,P)	INTEGER A,P	INTEGER	Fortran 77 и более поздние версии
AMOD(A,P)	REAL(4) A,P	REAL(4)	Fortran 77 и более поздние версии
DMOD(A,P)	REAL(8) A,P	REAL(8)	Fortran 77 и более поздние версии
BMOD(A,P)	INTEGER(1) A,P	INTEGER(1)	Расширение GNU
IMOD(A,P)	INTEGER(2) A,P	INTEGER(2)	Расширение GNU
JMOD(A,P)	INTEGER(4) A,P	INTEGER(4)	Расширение GNU
KMOD(A,P)	INTEGER(8) A,P	INTEGER(8)	Расширение GNU

См. также:

MODULO

Далее: MODULO, Предыдущий: MINVAL, Вверх: Встроенные процедуры [Оглавление][Индекс]