返回首页
在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编辑符
有两种格式:Aw或A
例如:
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(这里`代表空格)。