单选题当输入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) ENDA
4.0B
5.0C
6.0D
7.0
题目内容(请给出正确答案)
单选题
当输入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