uiyam

반올림 오류의 원인을 알 수 없기 때문에 약간 까다 롭습니다. 경우 dx보다는 다만 작은 조금 더 컸다 0.008다음 부문은 before/dx여전히 같은 값으로 반올림 될 수 있지만, 지금 -13올바른 해답이 될 것입니다. 그게 내가 본 것을 것을 주변의 가장 일반적인 방법 그냥하는 것입니다 말했다 찔러 반대 방향으로 아무리 작은 이전 값을. 이 같은: program sign_test use iso_fortran_env implicit none real(kind=real64) :: a, b integer(kind=int32) :: c a = -0.112 b = 0.008 c = my_ceiling(a/b) print*, a, b, c contains function my_ceiling(v) implici..