real*8, dimension (40) :: M(40)
...
open(unit=99,file="input.inp")
do i=1,40
read(99,*) M(i)
enddo
write(*,*) M(1)
...
In the file "input.inp", I have float numbers, like:
0.85
0.90
...
But when I read and write them on terminal, it gives me the first element: 0.849999...
How can I fix it to give me exact 0.85?
Edit: I compile it on gfortran. lol