小弟第一次接触Fortran，先前完全没有其他程式语言基础，想请问各位神大
假设两个数值分别是 k1=3.1415和 k2=2.71828 ，怎么转成二进制（取到小数第6位）再转回十进制，并计算其值与原值的差？
IMPLICIT NONE
Real*4 k1, k2
k1=3.1415
k2=2.71828
WRITE(*,'("Binary -> ", 2B32.6)') k1, k2
OPEN(unit=20, file='FT_01031201_EX04_2.out')
WRITE(20,'("Binary -> ", 2B32.6)') k1, k2
只会写到这里
从下面开始，改怎么利用刚刚算的二进制值再转十进制？
WRITE(*,'("Output the data")')
50 FORMAT('Output the data')
WRITE(20,50) 'Integer -> ', 2I32.6 ,k1, k2
CLOSE(20)
END
万分感谢解惑