问题
单项选择题
阅读下列FORTRAN程序: DIMENSIONA(3) DATAA/3.0,2.0,1.0/ X=F(A) WRITE(*,100)X 100FORMAT(1X,F3.1) END FUNCTIONF(B) DIMENSIONA(3),B(3) DO10I=1,3 10A(1)=B(1)-I F=A(1)+A(2)+A(3) X=1.0-F END 执行上述程序后,输出的X值为( )。
A.( 1.0
B.( 0.0
C.( 6.0
D.( -5.0
答案
参考答案:B
解析: 主过程中的数组A作为实参与子过程中的形参数组B对应,子过程中的数组 A与主过程中的数组A没有关系。 [点评] 该题考察Fortran的函数调用与参数传递。