9.201 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, Вверх: Встроенные процедуры [Содержание][Индекс]