有关mod 函数

fcode

是的，不可以。
改善的做法是：

[Fortran] 纯文本查看 复制代码

real :: i
integer :: ido
Do ido = 1 , Nint( 30.0/0.025 )
  i = 0.025 * (ido-1)
  ....