rmml.net
当前位置:首页 >> FortrAnFortrAn如何判断到达文件末尾 >>

FortrAnFortrAn如何判断到达文件末尾

Program Main Implicit None integer n integer :: GetFileN Open( 12 , File = 'a.txt' ) n = GetFileN( 12 ) Write( * , * ) '共有',n,'行!' Close( 12 ) End Program Main Integer Function GetFileN( iFileUnit ) Implicit None Integer , ...

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

方法一,如: read(1,*,end=111) fa 读到文件末尾处跳到第111行。 方法二: 利用oistat语法,比较麻烦,看看书。

如果你的文本文件每一行都是一样的长度。那么你可以试试用 “有格式文件直接读写方式” 打开文件。 如果你的文本文件每一行长度不同。则有点难办。如果你用的 windows 下的 Compaq Visual Fortran ,Digital Visual Fortran ,Intel Visual Fortra...

open的时候加上 access = 'append' 参考:http://www.newsmth.net/bbsanc.php?path=%2Fgroups%2Fsci.faq%2FNumComp%2Ffor%2FFortran%2Fappend

integer:: end read (1, iostat= end) if (end

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...

用endfile试试

implicit none; integer::nline; nline=0; open(101,file='替换为需要的文件名称',status='old',action='read'); do while(.not.eof(101)) read(101,*); nline=nline+1; end do close(101); write(*,*)'line No.:',nline; end 上面程序适用于常...

谁乱说没区别的。有没有区别要看系统和编译器。 Unix文件系统下大小写是敏感的,.f90和.F90是两个不同的文件。而后者常作为未进行预处理的文件而默认会进行预处理,前者往往不会。如果文件里面有 #include "xxx" 之类的语句,前者一般是会报错的...

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