end of file
我也出现了类似的end of file问题。open(unit = 111, file = 'kxmod.dat')
i = 0
j = 0
k = 0
do j = 1,415
do i = 1, 10
read(111,*) (a((j-1)*106+(i-1)*10+k),k=1,10)
end do
read(111,*) (a((j-1)*106+i*10+k),k=1,6)
end do
close(111)
上面是我读的代码
每组数据都是前10行10个数据,第11行6个数据,要把数据都存如a中。
运行是出现中断,此时j=44,不知道哪出错了,求解答。
在我这里可以正常得到结果
avg is 3226.910
请按任意键继续. . . fcode 发表于 2015-3-4 17:04
在我这里可以正常得到结果
avg is 3226.910
我今天打开运行了一下,直接出现语法问题
read(111,*) (a((j-1)*106+(i-1)*10+k),k=1,10)
就是这一行有问题
read(111,*) (a((j-1)*106+(i-1)*10+k),k=1,10)
红色代码的括号,请使用半角状态输入 fcode 发表于 2015-3-5 17:51
read(111,*) (a((j-1)*106+(i-1)*10+k),k=1,10)
红色代码的括号,请使用半角状态输入 ...
这么个简单的问题让我苦恼了这么长时间,十分感谢:-handshake
页:
[1]