阅读下列FORTRAN程序:
DIMENSION A(3,4)
DATA A/3*+4.0,3*-3.0,3*-2.0,3*-1.0/
S=0.0
DO 20 K=1,3
D=A(K,1)
DO 10J=2,4
IF(A(K,J)<D) D=A(K,J)
10 CONTINUE
S=S+D
20 CONTINUE
WRITE(*,*) S
END
A.-15.0 B.-12.0 C.9.0 D.6.0