Calculer le reste de la division euclidienne (ou modulo) en fortran

Pour calculer le reste de la division euclidienne (ou modulo) en fortran il existe la fonction modulo illustration:

program test_fortran_modulo

implicit none

write(6,*) modulo(10,2)
write(6,*) modulo(10,3)

end

donne

0
1

car 10 = 2 * 5 + 0 et 10 = 3 * 3 + 1.

Références