real*8, dimension (40) :: M(40)
...
open(unit=99,file="input.inp")
do i=1,40
read(99,*) M(i)
enddo
write(*,*) M(1)
...
在文件“input.inp”中，我有浮动数字，如：
0.85
0.90
...
但是当我在终端上读取和写入它们时，它给了我第一个元素：0.849999 ......
如何修复它以准确给出0.85？
编辑：我在gfortran上编译它。洛尔