sppk.net
当前位置:首页 >> FortrAn怎样读取txt文件里面两列数据? >>

FortrAn怎样读取txt文件里面两列数据?

首先你要看有多少行多少列。 不妨,按照你的例子,比如有10行,2列 开头写上行数,列数10,2 之后就是你的数组 然后代码如下: program mainimplicit noneINTEGER m,n,iREAL,ALLOCATABLE:: a(:),b(:)OPEN(8,FILE="a.txt")READ(8,*)m,n !n=2ALLOCA...

REAL X(100),Y(100) OPEN(12,FILE='123.TXT') DO I=1,100,1 READ(12,100) X(I),Y(I) ENDDO 100 FORMAT(F5.2,1X,F5.2) 说明:123为你txt文档名字 txt中数据时有要求的,你给的数据有个别不满足要求,如 4.50 5.00应该改成 4.50 5.00也就是说要改成整...

萝莉资源 http://flba90.com/forum.php?x=666285 萝莉控福利 http://flba90.com/forum.php?x=666285

这是一个基本操作。如果你这么问,我建议你系统的阅读一本教科书。 以下是通用的格式: Open( 12 , File = 文件名 ) Read( 12 , * ) 数组 Close( 12 ) 但具体你的文件是什么样子,是文本文件,还是二进制文件?文本文件是成列的,还是成块的?数...

代码如下: real time(n),flux(n) ! 定义两个数组,分别存放时间和流量,数组大小为n,即数据的个数 open(1,file='data.txt') ! 打开数据文件 do i=1,n ! 逐行读入数据 read(1,*)time(i),flux(i) ! 依次读入时间和流量 enddo end 补充: 注释有...

读取时请用“自由格式”,而不要用规格化的格式,因为你提供的数据不是规格化的。

例如:有一个TXT文件是4列、2412行的,想交换它的第二列和第三列,不用EXCEL数据文件“in.txt”qerwqwe 56.67 34.45 12.00dfdfd 12.78 34.89 11.00tyyu 45.89 12.67 67.00以下是fortran77程序文件:character*8 areal b,c,dinteger stat1open(8,fi...

字符串处理本就不是fortran的强项。此问题用pascal很容易,程序如下: var f1,f2:text; s,s1,s2:string; p1,p2:integer; begin assign(f1,'test.txt'); reset(f1); assign(f2,'test.out'); rewrite(f2); while not eof(f1) do begin readln(f1,s...

写成直接读取文件,来读取相应的记录

read里只写3个变量就行了 do i = 1:n read(fid,*)a(i),b(i),c(i) end do

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