我做一些小改动,运行没有问题,请参考。
program read_file
implicit none
real, dimension(:,:), allocatable:: data
integer :: np, ns, i, temp
open(10,file='data')
read(10,)np,ns
allocate(data(np,ns))
do i=1,np
read(10,)temp,data(i,:)
enddo
open(20,file='out')
do i=1,np
write(20,),i,data(i,:),sum(data(i,:)),sum(data(i,:))/ns
end do
deallocate(data)
close(20)
close(10)
end program read_file
是write语句的格式问题
character m
write(m,'(i2)') i
此处不是很理解,m是一个字符(character),为何用作文件的编号呢?
用问题再交流
能否详细描述一下?贴一下程序?
在结尾前加一个pause语句,可能是运行完自动退出了。
===========================================================
你没有源程序吗?有源程序就好分析了。
另外,你对问题的描述太简略了,什么叫做不能运行呢?是死机,还是没有输出就结束了,还是显示一些错误信息?
你最好截个图,否则什么都没有别人很难帮助你。
以上就是关于FORTRAN语言循环语句一直运行不出来,求助!全部的内容,包括:FORTRAN语言循环语句一直运行不出来,求助!、Fortran 程序链接都是对的,但运行出错,我不太会调试程序,不知道怎么的了,谢谢大家了啊~~、我的fortran程序为什么在我的电脑运行没有结果等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)