(来学网)有程序:DIMENSION A(2,2)
INTEGER A,Y
Y=0
DO 20 I=1,2
D0 20 J=1,2
A(I,J)=I*I+J*J
Y=Y+A(I,J)
20 CONTINUE
WRITE(*,*)Y
END
此程序运行的结果为:
  • 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。
计算机应用基础