问题
单项选择题
有程序:DIMENSIONA(2,2)INTEGERA,YY=0DO20I=1,2D020J=1,2A(I,J)=I*I+J*JY=Y+A(I,J)20CONTINUEWRITE(*,*)YEND此程序运行的结果为:()
A.16
B.20
C.27
D.30
答案
参考答案:B
解析:程序运行时利用双重循环为数组A赋值,其中A(1,1)=2,A(1,2)=5,A(2,1)=5,A(2,2)=8,再经过Y=Y+A(I,J)累加后,其结果为20。