将输出限制为两位小数

Question

问题1：为什么我不能将x = -0.6置于我的do while循环中？

x=-0.6

do while (x<0.6)
  x = x + 0.1
  write(*,*) x
end do

结果

 -0.40000001    
 -0.30000001      
 -0.20000002      
 -0.10000002          
 -1.49011612E-08  
  9.99999866E-02      
  0.19999999          
  0.29999998         
  0.39999998         
  0.49999997         
  0.59999996

但我只想要-0.5，-0.4，-0.3，-0.2，-0.1 ...... 0.5，我怎么能这样做呢？通过声明real(kind=2) :: x。但是fortran 90中的命令是什么？

Answer 1

您不想更改数据类型，只想更改输出格式：

write(*, '(f5.2)') x