问题
单项选择题
F(X,Y)=X*X+Y*YOPEN(8,FILE='FD.DAT',STATUS='NEW',ACCESS='DIRECT',*FORM='UNFORMATTED',RECL=16)D010K=1.6P=F(REAL(K),REAL(K+1)10WRITE(8,REC=K)PCLOSE(8)OPEN(6,FILE='FD.DAT',STATUS='OLD',ACCESS='DIRECT',*FORM='UNFORMATTED',RECL=16)DO20K=2,6,2READ(6REC=K)T20WRITE(*,100)T100FORMAT(1X,F4.1)CLOSE(6)END运行上述程序后,输出的结果为()。
A.5.013.041.0
B.13.041.085.0
C.5.025.061.0
D.13.025.061.0
答案
参考答案:B