八、输出格式

返回首页

在Fortran中使用指定输出格式的方式如下:

write(u,n) 输出表列 n format(格式编辑符)

u是指输出的设备号,*号代指系统隐含,一般为6(指显示器)。
n是指格式输出的标号(写在标号区),指定一个format语句与之对应,以进行格式说明(*号时为系统隐含格式)。

整型数的输出

I编辑符

格式(1):[r]Iw
w为数值占的列数(字段宽度),例如:
write(*,100) J,K,L 100 format(1X,I3,I5,I7)

表示J占3列,K占5列,L占7列输出,1X是表示输出前控一个空格。
r表示重复系数,如下:
a=12,b=23,c=123 write(*,100) a,b,c 100 format(1X,2I2,I3)

将会输出1223123

格式(2):[r]Iw.m
m表示输出的最少数字位数,不足的以0补齐。例如:
a=10,b=-12,c=123 write(*,100) a,b,c 100 format(1X,I3,I5.4,I7.5)

将会输出`10-0012``00123(这里`代表空格)。
注:当字段宽度不足以显示变量的值时,会输出*号来填充该段字段宽度。

实型数的输出

F编辑符

用于输出小数, 一般格式:Fw.d
w表示字段宽度;d表示输出数据的小数位数。例如:
a=15.8,b=-746.578,c=873.2 write(*,100) a,b,c 100 format(1X,F6.1,F9.2,F7.2)

将会输出```15.8``-746.58`873.20(这里`代表空格)。

E编辑符

用于输出指数, 一般格式:Ew.d
w表示字段宽度;d表示输出数据的小数位数。例如:
a=15.8,b=-746.578,c=873.2 write(*,100) a,b,c 100 format(1X,E15.6,E12.4,E9.3)

将会输出```0.158000E+02``0.7466E+030.873E+03(这里`代表空格)。

双精度数的输出

D编辑符

用于双精度数的输出,一般格式为:Dw.d
w表示字段宽度;d表示输出数据的小数位数。例如:
D1=1.378675893D+02 D2=1784.5D-03 write(*,100) D1,D2 100 format(1X,D18.10,D18.7)

将会输出``0.1378675842D+03`````0.1784500D+01(这里`代表空格)。
双精度数也可以使用F编辑符输出(格式见实型数输出)。

字符型变量输出

A编辑符

有两种格式:AwA
例如:
s="China" write(*,100) s,s,s 100 format(1x,a7,a3,a)

将会输出```ChinaChiChina(这里`代表空格)。

撇号编辑符

格式如下:
write(*,100) 100 format("China")

在格式编辑符中使用单引号和双引号的效果相同。

逻辑型变量输出

格式为:Lw
例如:
logical::judge=.true. write(u,200) judge 200 format(L4)

将会输出```T(这里`代表空格)。