问题
单项选择题
当输入1.5,2.5,3.5,4.0下列程序执行后的输出结果为()。
DIMENSIONA(2,2)
READ(*,*)A
SUM=0
DO10I=1,2
DO20J=I,2
K=A(I,J)*I*J
10A(1,2)=K
WRITE(*,*)A(2,1)
END
A.4.0
B.5.0
C.6.0
D.7.0
答案
参考答案:B
当输入1.5,2.5,3.5,4.0下列程序执行后的输出结果为()。
DIMENSIONA(2,2)
READ(*,*)A
SUM=0
DO10I=1,2
DO20J=I,2
K=A(I,J)*I*J
10A(1,2)=K
WRITE(*,*)A(2,1)
END
A.4.0
B.5.0
C.6.0
D.7.0
参考答案:B