有程序：K=0DO10I=1，2DO10J=1，210K=K+I／JWRITE（*，*）KEND此程序的执行结果K值为（）

单选题

有程序：K=0DO10I=1，6，2DO10J=1，6，3IF（K．LT．I*J）K=I*J10CONTINUEWRITE（*，*）KEND此程序执行后的输出结果为：（）

A.18 B.30 C.25 D.36

答案

单选题

有程序：K=0DO10I=1，2DO10J=1，210K=K+I／JWRITE（*，*）KEND此程序的执行结果K值为（）

A.0 B.2 C.2.5 D.1

答案

单选题

有程序：INTEGERPP=0DO10I=0，10，3DO10J=5，100，20DO10K=-10，-5，-110P=P+1WRITE（*，*）PEND此程序的运行结果是：（）

A.0 B.24 C.120 D.144

答案

单选题

下列程序执行后的输出结果为（　）。 K=0 DO10I=1，6，2 DO10J=I，6，3 IF(I.EQ.J)THEN K=K+J ELSE K=K+1 ENDIF 10CONTINUE WRITE(*，*)K END

A.18 B.11 C.15 D.10

答案

单选题

有程序：K=1DO10I=1，2DO10J=1，210K=K*I／JWRITE（*，*）KEND此程序执行后的输出结果为（）

A.1 B.0 C.0.5 D.2

答案

单选题

有程序：DO10I=1，5，3DO10J=I，310K=I+JWRITE（*，*）KEND此程序的运行结果是：（）

A.8 B.4 C.7 D.10

答案

主观题

以下 VBA 程序段运行后，变量 j 的值是______。 k = 10 j = 0 Do k = k + 10 j = j + 1 Loop Until k > 20

答案

单选题

阅读FORTRAN程序：READC*，*)I，J，K DO 10 N=l,2 I=I+J+K J=I+K+J K=I+J+K 10 CONTINUEWRITE(*，20)I，J，K 20 FORMAT(2X，315)END键盘输入1，0，0则程序运行后的输出结果是：

A.4 7 13 B.2 3 4 C.1 1 2 D.6 9 15

答案

单选题

有程序：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

答案

主观题

指出程序结束之时，j、i、k的值分别是【】 main( ) { int a=10,b=5,c=5,d=5,i=0,j=0,k=0; for (;a>b;++b) i++; while (a>++c) j++; do k++; while (a>d++); }

答案