加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

Fortran编程:输入输出的格式命令与文本文件的读写

(2013-01-25 01:40:57)
标签:

fortran

分类: 学习_Fortran
Fortran中输入输出的格式命令,[]中的可省略  

A[w]  以w个字符宽度来输出字符串  
BN  定义文本框中的空位为没有东西,在输入时才需要使用  
BZ  定义文本框中的空位代表0,输入时才需要使用  
Dw.d  以w个字符宽来输出指数类型的浮点数,小数部分占d个字符宽  
Ew.d[Ee]  以w个字符宽度来输出指数类型的浮点数,小数部分占d个字符宽,指数部分占e个字符  
ENw.d[Ee]  以指数类型来输出浮点数,工程计数法  
ESw.d[Ee]  以指数类型来输出浮点数,科学计数法  
Fw.d  以w个字符宽来输出浮点数,小数部分占d个字符宽  
Gw.d[Ee]  以w个字符宽度来输出任何种类的数据  
Iw[.m]  以w个字符宽来输出整数,最少输出m个数字  
Lw  以w个字符宽来输出T或F的真假值  
nX  把输出的位置向右跳过n个位置  
/   换行  
:   在没有更多数据时结束输出  
kP  K值控制输入输出的SCALE  
Tn  输出的位置移动到本行第n列  
TLn  输出的位置向左相对移动n列  
TRn  输出的位置向右相对移动n列  
SP  在数值为正时加上“正号”  
SS  取消SP  

例:  
write(*,"(1x, 5D18.10)") (x(i), i=1,n)
write(*,"(1x,1PD18.10)") f  // 指数形式输出,小数点前保留一位非零数

以下Fortran 90 添加  
Bw[.m]  把整数转换成二进制来输出,输出会占w个字符宽,固定输出m个数字。m值可以不给定  
Ow[.m]  把整数转换成八进制来输出,输出会占w个字符宽,固定输出m个数字。m值可以不给定  
Zw[.m]  把整数转换成十六进制来输出,输出会占w个字符宽,固定输出m个数字。m值可以不给定  

文本文件的读写:

(1) 首先打开一个文件

open(99,file='output.txt',access='sequential',form='formatted',status='unkonwn') 

解释:设备号为99,文件名为output.txt,存取方式为顺序访问,有格式

(2) 写文件

100  format('1x, A7, I2, E8.2, F6.4')

write(99,100) 'result=', n, x, y

(3) 关闭文件

close(99)

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有