Question

fortran编程。求教求余函数的算法。我认为 MOD(1,5)=0,但结果为1.请指教。

program main
implicit none
integer a,b,c

a=1
b=5
c=mod(a,b)
write(*,*) c
stop
end

Answer 1

同学，你的算法没有错误！
求余运算中，mod(1,5)是等于1的，因为1/5=0…1

所以余数是1，希望你能够采纳！谢谢！

Answer 2

先说结论，这个计算结果是正确的。因为根据我的测试，fortran中的mod函数中计算商时应该是向下取整的,其中整数当然也包括0,举个例子，比如说1/5=0余1,即mod(1,5)=1；再举个更复杂的例子，36/（-10）=-4余-4（前一个-4是商，后一个是余数，余数计算法则为被除数减去除数与商的积，即-4=36-（-10）×（-4））或-3余6，但因其向下取整，因此mod（36,-10）=-4,即取前一种情况。