请教一个读取文件时发生的错误

nanerhebu · 发表于 2012-11-6 19:10:55

登录后查看更多精彩内容~

您需要登录才可以下载或查看，没有帐号？立即注册

x

程序为：
program test
implicit none
real,dimension(5,2)::a
integer i,j

open(10,file='d:\yangrong\aa.txt',form='formatted')
do i=1,5
do j=1,2
read(10,*) a(i,j)
enddo
enddo
close(10)

print*,a
end

aa.txt为：
2.0
0.1
2.0
0.2
2.0
0.3
2.0
0.4
2.0
0.5

编译时没错误，运行时提示触发一个断点：
Y6E_S6XIW}CM8QZI0PHRJ72.jpg

请问这是什么问题呢？

nanerhebu · 发表于 2012-11-6 19:11:49

我使用的编译器为Intel Fortran

言深深 · 发表于 2012-11-6 22:26:05

form='formatted'这一句去掉

river · 发表于 2012-11-7 07:30:03

说没找到文件，看看路径和文件名称对不对

xu850202 · 发表于 2012-11-7 09:39:55

如果你的程序与文件在一起，可以把路径去掉，直接写文件名

nanerhebu · 发表于 2012-11-10 09:51:50

问题解决了，是因为read语句外只能用一个循环（不能有循环的嵌套）

易小凯 · 发表于 2012-11-11 17:45:29

nanerhebu 发表于 2012-11-10 09:51

登录/注册后可看大图

问题解决了，是因为read语句外只能用一个循环（不能有循环的嵌套）

建议读数据的时候用隐式循环

nanerhebu · 发表于 2012-11-11 20:51:40

易小凯发表于 2012-11-11 17:45

登录/注册后可看大图

建议读数据的时候用隐式循环

嗯，隐形循环几乎是唯一的办法

		自动登录	找回密码
密码			立即注册

[求助] 请教一个读取文件时发生的错误

登录后查看更多精彩内容~