CHARACTER(10) NAME(3)
CHARACTER(5) NUMBER(3)
INTEGER G1(3),G2(3)
OPEN (10,FILE='ccccc.dat',ACCESS='DIRECT',RECL=25)
DO I=1,3
READ(10) 100,NAME(I),NUMBER(I),G1(I),G2(I)
ENDDO
100 FORMAT(A10,A5,2I5)
END
写的代码如上
xuesheng0100001 89 89xuesheng0300003 89 89xuesheng0200002 89 89
这是ccccc.dat文件的内容
--------------------Configuration: B - Win32 Release--------------------
Compiling Fortran...
F:\school code fortran\NEW\B\b1.f90
F:\school code fortran\NEW\B\b1.f90(6) : Error: Constants and expressions are invalid in read-only I/O lists. [100]
READ(10) 100,NAME(I),NUMBER(I),G1(I),G2(I)
---------^
Error executing df.exe.
b1.obj - 1 error(s), 0 warning(s)
报错,如果把100去掉再执行小黑框会这么显示
forrtl: severe (259): sequential-access I/O to unit open for direct access, unit 10, file F:\school code fortran\NEW\B\ccccc.dat
Image PC Routine Line Source
B.exe 00406579 Unknown Unknown Unknown
Press any key to continue
麻烦了,第一次学编程语言,还请大神们指点指点
另外帮忙看看这道题,哈哈哈,做了几个小时了,还没解决,实在搞不下去了,大神不用给我弄50个学生,搞个三四个意思到了就行😁