FORTRAN表控输出总结（转）

lysx

advance="no"，就是输出不换行。

write(*,"(f10.1)",advance="no")A

格式化输出的控制字符非常的丰富，但常用的并不多，一般说来:" I 、F、E、A、X "是最常使用的几个格式，最好把它们都记下来。

Iw[.m] 以w个字符的宽度来输出整数，至少输出m个数字。 如：write(*,"(I5)") 100 输出：_ _100 ; 前面两空格

Fw.d 以w个字符文本框来输出浮点数，小数部分占d个字符宽，输出文本框的设置不中会出现*号。如：write(*,"(F9.3)") 123.45 输出：_ _123.450 ; 前面两空格，后补0

Ew.d[Ee] 用科学计数法，以w个字符宽来输出浮点数，小数部分占d个字符宽，指数部分最少输出e个数字。如：write(*,"(E15.7)" 123.45 输出：_ _0.1234500E+03 ; 输出不中15个字符的部分补上空白，小数部分不足7位的会补0

Dw.d 使用方法同Ew.d，差别在于输出时用来代表指数的字母由E换成D。

Aw 以w个字符宽来输出字符串。 write（*,"(A10)") "Hello" 固定用是为10我个字符段来输出字符串，不足的前面补空格

nX 输出位置向右移动n位。write(*,"(5X,I3)") 100 ; 将先填5个空格，再输出整数。

Lw 以w个字符宽来输出T或F的真假值。write(*,"(L4)") .true. ;程序会输出3个空格和一个T

/ 换行输出。write(*,"(I3//3)") 10,10 程序会得出4行，中间两行空格是从除号"/"得到的。

Tc 把输出的位置移动到本行的第c个字节。

TLn 输出位置向左相对移动n个字节。

TRn 输出位置向左相对移动n个字节。

SP、SS 加了SP后，输出数字时如数值为正则加上"+"，SS则是用来取消SP的功能。 如 write(*,"(SP , I5 , I5 , SS , I5)") 5 , 5 , 5 输出：+5 +5 5

BN、BZ BN定义在输入时没有数据的字节代表没有东西。BZ定义在没有数据的字节代表0

另有kP 、Bw[.m] 、Ow[.m] 、Zw[.m]用的较少，在需要时可以查询。

深深提示一下补充内容：：

<k>+上述输出方式可以动态输出,其中k必须为整型的。如：

WRITE ( *, ‘(<k>F11.3)’) array将输出k个浮点型实数。

言深深

补充一下，如果输出多个的可以直接用数字：
5f10.2
也可以用字符常量来表示：
<n>f10.2
其中n可以是整型数组。

lysx

言深深 发表于 2014-8-26 21:41
补充一下，如果输出多个的可以直接用数字：
5f10.2
也可以用字符常量来表示：

嗯，这个得加上，尤其是在动态输出的时候很有用啊！

言深深

lysx 发表于 2014-8-27 09:05
嗯，这个得加上，尤其是在动态输出的时候很有用啊！

是的啊

水静流深

太牛了！！！

axiujing

谢谢分享

wangxue910402

受教了