本帖最后由 胆怯滴大侠 于 2020-11-16 21:19 编辑
请教前辈,我是按照教材上的例子写的代码,用的是vs2013, 下面是我的代码和错误,请前辈指点一下
[Fortran] 纯文本查看 复制代码 program Console1
parameter (n=10)
dimension name(n),s(n)
character name*10
open(1,file='stu1.dat',form='formatted')
do i=1,n
read (1,20) name(i),s(i)
enddo
20 format(a6,f5.1)
end program Console1
|