[Fortran] 纯文本查看 复制代码 program diaocha1
implicit none
real a,b,c
open(unit=10,file='1218.txt',status='old',access='sequential',form='formatted')
read(10,100),a
close(10)
100 format(A,f7.4)
stop
open(unit=20,file='12182.txt',access='sequential',status='old',form='formatted')
read(20,100),b
close(20)
stop
open(unit=30,file='12183.txt',access='sequential',status='new',form='formatted')
c=a+b
write(30,100),c
close(30)
stop
end
这是我编辑的一个尝试文件读取和使用的代码,但是很明显又错了~~大哭~
软件提示有错误,但是不知道是什么错误。求帮忙~
|