找回密码
 注册
Simdroid-非首页
查看: 133|回复: 5

[3. Fortran] 求助关于用Fortran读入文件数据,不能读入的问题!

[复制链接]
发表于 2011-3-26 10:54:07 | 显示全部楼层 |阅读模式 来自 江苏南京
程序“try01.f90”对应的读入文件是“Q01.txt”,其中文件“Q01.txt”中数据为——第一列为变量y的值,第二列为变量x1的值,第三列为变量x2的值,第四列为变量x3的值,第五列为变量x4的值,第六列为变量x5的值,第七列为变量x6的值,这些变量的数值有428个,即每一列数据有428行。最后程序输出的是各个x系列平均值。



程序“try.f90”对应的读入文件是“Q.txt”,其中文件“Q.txt”中数据为——第一列为变量y的值,第二列为变量x1的值,第三列为变量x2的值,第四列为变量x3的值,第五列为变量x4的值,第六列为变量x5的值,第七列为变量x6的值,第八列为变量x7的值,这些变量的数值有428个,即每一列数据有428行。最后程序输出的是各个x系列平均值。





PS:这两个程序的差别就是,第一个程序读入的是总共有7列数据,而第二个程序读入的是8列数据。但是问题是第一个程序能读入成功,而第二个程序就不行了读入的时候。这两个程序的源代码只是做了一个相应的简单变化的(详情见文件)!!  还望各位Fortran达人解答小弟的问题!!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
 楼主| 发表于 2011-3-26 10:57:11 | 显示全部楼层 来自 江苏南京
Simdroid开发平台
这个是第二个程序运行时,提示的错误结果截图!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
回复 不支持

使用道具 举报

发表于 2011-3-26 13:12:51 | 显示全部楼层 来自 江苏南京
读完文件后要结束程序对文件的读取:加上结束标识,如:read(fileid,*,end=20)
20 close(fileid) ,加上这后,肯定会成功的
回复 不支持

使用道具 举报

 楼主| 发表于 2011-3-28 08:43:22 | 显示全部楼层 来自 江苏南京
本帖最后由 哥萨克 于 2011-3-28 12:20 编辑

PS:本人又遇到一个问题!还是同样的程序内容,只是多加了一列数据读入的时候!结果运行之后提示为下图所示。还请各位高手指导一下!!谢谢了先!!!附件为源程序代码!!

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

×
回复 不支持

使用道具 举报

发表于 2011-4-7 14:10:59 | 显示全部楼层 来自 美国
数据文件第160行有错!!!缺少空格。
将read语句更新为:
     read(fileid, *, err=100,end=200) y(i),x1(i),x2(i),x3(i),x4(i),x5(i),x6(i),x7(i),x8(i)!,x9(i)!,x10(i)
来检测。
回复 不支持

使用道具 举报

发表于 2011-4-26 10:50:56 | 显示全部楼层 来自 陕西西安
学习了,小弟正在学fortran。
回复 不支持

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Simapps系列直播

Archiver|小黑屋|联系我们|仿真互动网 ( 京ICP备15048925号-7 )

GMT+8, 2024-11-1 07:48 , Processed in 0.036326 second(s), 13 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表