问题 单项选择题

阅读下列FORTRAN77程序:

F(X,Y)=X*X+Y*Y

OPEN(8,FILE=’FD.DAT,STATUS=’NEW’,ACCESS=’DIRECr’,

*FORM=’UNFORMATTED’,RECL=16)

D010K=1,6

P=F(REAL(K),REAL(K+1))

10WRITE(8,REC=K)P

CLOSE(8)

OPEN(6,FILE=’FD.DAT’,STATUS=’OLD’,ACCESS=’DIRECr’,

*FORM=’UNFORMATTED’,RECL=16)

DO20K=2,6,2

READ(6,REC=K)T

20WRITE(*,100)T

100FORMAT(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

答案

参考答案:C

解析:

在直接文件中存人了6个数字形成6个记录,分别为5、13、25、41、61、 85,然后读出记录2、4、6。

[点评] 该题考察Fortran的文件。

选择题
单项选择题 B1型题