单项选择题

下面的子程序求一方阵的次对角线上的元素之和。 SUBROUTINE CDJX(M，N，K) DIMENSION M(N，50) DO 10 J=1，N K=______ 10 CONTINUE RETURN END 为了使程序完整，应在______处填入的是：

A． K+M(J，J)
B． K+M(J，N+1-J)
C． K+M(N-J，J)
D． K+M(N+J，N-J)
<上一题 目录 下一题>
热门 试题

单项选择题
阅读下列FORTRAN程序： INTEGER X(7) DATA X 4，5，7，8，10,12,11 DO 10K=1，7 IF(MOD(X(K)，2).NE.0)THEN S=S+X(K) N=N+1 END IF 10 CONTINUE T=S N WRITE(*．20)S，T 20 FORMAT(2X，3F6.1) END 程序运行后的输出结果是：
A． 23.0 7.7
B． 47.0 6.7
C． 34.0 8.5
D． 57.0 11.4
单项选择题
阅读以下FORTRAN程序： K1=M(5) K2=M(K1) K3=M(K1)+M(K2) K4=M(K1+K2+K3) WRITE(*，100)K4 100 FORMAT(2X，'K4'='，I3) END FUNCTION M(N) M=N+1 RETURN END 程序的输出结果是：
A． K4=28
B． K4=27
C． K4=30
D． K4=29
相关试题