(来学网)阅读下列FORTRAN77程序:
F(X,Y)=X*X+Y*Y
OPEN(8,FILE='FD.DAT',STATUS='NEW',ACCESS='DIRECT',*FORM='UNFORMATTED',RECL=16)
DO10K=1,6
P=F(REAL(K),REAL(K+1))
10 WRITE(8,REC=K)P
CLOSE(8)
OPEN(6,FILE='FD.DAT',STATUS='OLD',ACCESS='DIRECT',*FORM='UNFORMATTED',RECL=16)
DO20K=2,6。2
READ(6,REC=K)T
20 WRITE(*,100)T
100 FORMAT(1X,F4.1)
CLOSE(6)
END
运行上述程序后,输出的结果为(  )。
  • A.
    (来学网)5.0
    13.0
    25.0
  • B.
    (来学网)5.0
    25.0
    61.0
  • C.
    (来学网)13.0
    41.0
    85.0
  • D.
    (来学网)41.0
    61.0
    85.0