rmml.net
当前位置:首页 >> FortrAn iostAt >>

FortrAn iostAt

使用一个计数变量用于记录行数,用iostat检查是否出错,如出错则表示read已经到达文件尾,直接跳出并显示行数 例如: program r character (len=100) :: line real :: x(100) integer :: i, n, io open (10, file = 'DATA') n = 0 do read (10, ...

首先,什么叫不知道有多少行? 你用记事本打开,把光标放到第几行,底下就会显示第几行埃用excel打开也可以知道多少行。 其次, IOSTAT=var 这个字段会设置一个整数值给后面的整型变量,这是用来说明文件打开的状态,数值会有下面三种情况: var>...

文本打开后用EOF语句判断 OPEN(1,FILE='') IF(EOF(1))THEN CLOSE(1,STATUS='DELETE') ELSE .....读取数据!

能否补充一下程序和错误信息,光看文字描述是不应该出错。再交流。

读取编号为105的文件,按照格式串5300进行读取,读取后是否成功的状态保存到eof里面,读取的内容保存在titldum里面。 哥们在学习swat吧?

fortran 在处理文件时也有文件结尾的概念。 READ(UNIT=number, FMT=format, NML=namelist, REC=record, IOSTAT=stat, ERR=errlabel, END=endlabel, ADVANCE=advance, SIZE=size) UNIT=number 指定read/write所使用的输入输出的位置。FMT=format...

real x,y,c,d,e,finteger ioerroropen(5,file='cycle.txt',status='old')open(6,file='newcycle.txt',status='new')10read(5,*,iostat=ioerror)x,y,c,d,e,fif (ioerror.ne.0) goto 20if (sqrt(x*x+y*y).lt.5) thenwrite(*,100)x,y,c,d,e,fwrite(...

一直读,直到结束为止。 结束可用 iostat 判断

表示: 如遇到文件尾部,则跳转至语句标号为 50 的语句执行。 如遇到文件读取错误,则跳转至语句标号为 900 的语句执行。 这种语法不建议使用,新语法来说,建议用 ioStat

主程序 program mainimplicit noneinteger,PARAMETER::maxnum=1000!最大数组长度real*8::x(maxnum),y(maxnum)real*8,allocatable::x0(:)integer*4::i,j,k,ct=0,stat1character(200)::ch,stuname,stuidreal*8::xmax,xmin,xave,xmidstuname = '嬴...

网站首页 | 网站地图
All rights reserved Powered by www.rmml.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com