问题
单项选择题
阅读下列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的函数调用与参数传递。
