阅读下列FORTRAN77程序:INTEGERAA(2.3)DATAAA/1,2,3,4,5,6/CALLS2D19(AA)CALLS2D19(AA(1,2))ENDS
阅读下列FORTRAN77程序:
INTEGERAA(2.3)
DATAAA/1,2,3,4,5,6/
CALLS2D19(AA)
CALLS2D19(AA(1,2))
END
SUBROUTINES2D19(BB)
INTEGERBB(2,2)
WRITE(*,'(1X,2I3)’)BB(1,1),BB(2,2)
END
程序运行结果是()。
(A)14
(B)15
3626
(C)14
(D)12
2534