问题 单项选择题

有程序:INTEGERM(5,5)L=0DO40J=1,5DO40K=1,5M(J,K)=K40CONTINUEDO10I=1,5N=1IF(MOD(I,2).EQ.0)N=2DO10J=N,5,2L=L+M(I,J)10CONTINUEWRITE(*,20)L20FORMAT(2X,‘L=’,I3)END此程序运行的结果为:()

A.L=36

B.L=39

C.L=54

D.L=42

答案

参考答案:B

解析:程序运行时利用双重循环为K数组提供数据。当I能被2整除时,N=2,否则N=1,利用L=L+M(I,J)进行数据累加,最终结果应为39。

问答题
单项选择题