9楼: Originally posted by weiwei43 at 2016-05-05 08:20:36
如果不取整，这样处理：
write(6,100)t1,t2,t3,t4,t5,t6
100 format(1x,6(f5.0,1x))

如果取整，按下面方法处理：
write(6,100)t1,t2,t3,t4,t5,t6
100 format(1x,6(I5,1x))