读取浮点型文本资料，输出结果为整形

fcode · 发表于 2017-2-16 12:09:00

write(20,'(2(2x,a),2x,f9.3)')stid,"20"//trim(fname), line(out_id)

fcode · 发表于 2017-2-16 15:14:50

f 编辑符针对浮点数
i 编辑符针对整数

fcode · 发表于 2017-2-16 15:29:22

因为你希望输出浮点数，而 line 本身就是浮点数，不需要 int，也不能够 int。
f 编辑符针对浮点数，那么 f9.3 就可以了。

当然其他的宽度也可以，比如 f8.3 , f7.4，只要宽度够就可以，不一定必须 f9.3

[输入输出] 读取浮点型文本资料，输出结果为整形