Question

请问一下这是个完整的fortran编程吗？这是个读取数据的编程例子，如果不是的话还需要加些什么？

parameter(n=160,m=54)
iyb=1951
integer it(n,m)
open(11,file='R1601.txt')
read(11,*)((it(i,j),i=1,n),j=1,m)
close(11)

Answer 1

少了一个结束命令end，还有参量命名部分不是很全，应当按照隐含变量规则作变量声明。

追问

您好,可以加您为好友吗?以后有事我可以直接找您?给我留个联系方式或我给你留个联系方式!

追答

加我好友吧！我的邮箱huzi2008812@126.com，可以邮件联系。

Answer 2

最好要规范一点，完整的程序如下：
program read
implicit none
integer,parameter::n=160
integer,parameter::m=54
integer::iyb=1951
integer it(n,m)
open(11,file='R1601.txt')
read(11,*)((it(i,j),i=1,n),j=1,m)
close(11)
stop
end program read