(程序说明) 程序功能是求1到100之间的所有素数。

(程序)

SET TALK OFF

C．LEAR

J=2

D．O WHILE J＜＝100

I＝2

D．O WHILE (5)

IF MOD(J，I)＝0(6)

E．NDIF

I＝I+1

E．NDDO

IF (7)

?J

E．NDIF

J=J+1(8)

SET TALK ON

RETURN(5)

A．I＞J

B．I＞＝J

C．I＜J

D．I＜＝J

[单选题](程序说明) 求1～10之间的所有整数之和。(程序)SET TALK OFFSTORE 0 TO N，SD．O WHILE (1)N＝N+1S=S+NIF (2)(3)E．NDIFE．NDDO? “ S=”+STR (S，2)SET TALK ONRETURN(1)A．F.B．T.C．N＜＝10D．N＞＝10

[单选题](程序说明)程序功能是求30!。(程序)SET TALK OFFC．LEARN=1I＝1D．O WHILE (1)(2)N=N+1(3)? ISET TALK ON(1)A．N＜＞30B．N＞30C．N＜30D．N＜＝30

[单选题](程序)*** 主程序SET TALK OFFC．LEARSTORE 100 TO X，Y，ZSET PROCEDURE TO GC1D．O PROCl WITH X，Y? X，Y，ZSET PR()CEDURE TOSET TALK ONRETURN*** 过程PROCEDURE PROC1PARAMETER M，NM=M+100N＝N+100RETURNX的输出结果为 ______。A．100B．200C．300D．400

[单选题](程序说明) 程序功能是按姓名提供学生成绩的查询。(程序)SET TALK OFFUSE STDA．CCEPT“请输入待查学生姓名：”TO XMD．O WHILE (4)IF (5)?“姓名：”+姓名，“成绩：”+STR (成绩，3，0)E．NDIF(6)E．NDDOSET TALK ONRETURN(4)A．BOF ()B．EOF ()C．NOT. EOF()D．NOT. BOF()

[单选题](程序说明)程序功能是计算一个整数的各位数字之和。(程序)SET TALK OFFINPUT“x＝”TO xs＝0D．O WHILE x!=0s＝s+ MOD(x，10)(1)(2)? SSET TALK ON(1)A．x＝INT(x*10)B．x＝INT(x/10)C．x＝x-INT(x/10)D．x＝x-INT(x*10)

[单选题](程序说明) 程序功能是判断一个自然数是否为质数。(程序)SET TALK OFFINPUT“请输入一个大于1的自然数：” (1)K=0 &&K值为0表示所输入的数是质数，为1表示不是质数J=2D．O WHILE J＜NIF MOD(N，J) (2)(3)LOOPE．LSEK＝1E．XITE．NDIFE．NDDOIF K＝0? (4) +“是质数”E．LSE? “NO!”E．NDIFSET TALK ONRETURN(1)A．ON NB．TO NC．GO ND．INTO N

[单选题](程序说明)程序功能是对任意一个表都可以追加、删除记录。(程序)SET TALK OFFA．CCEPT“请输入文件名：”TO NAMEUSE (9)?“1.追加记录”?“2.删除记录”WAIT“请选择(1—2)：”TO MIF (10)A．PPEND BLANKE．DITE．LSEINPUT“输入要删除的记录号：”TO N(11)D．ELETEPACK(12)USESET TALK ONRETURN(9)A．&NAMEB．NAMEC．表 NAMED．NAME

[单选题](程序)SET TALK OFFD．IMENSION A(6)F．OR K＝1 TO 6A．(K)=30—3*KE．NDFORK＝5D．O WHILE K＞＝1A．(K)=A(K)—A(K+1)K＝K—1E．NDDO? A(1)，A(2)，A(4)，A(6)SET TALK ONRETURNA．(1)的输出结果为 ______。A．24B．15C．27D．9

[试题](12 ）以下程序的功能是在立即窗口中输出 100 到 200 之间所有的素数，并统计输出素数的个数。请在程序空白处填入适当的语句，使程序可以完成指定的功能。Private Sub Command2_Click()D．im i%, j%, k%, t % ‘ t 为统计素数的个数D． im b As BooleanF．or i = 100 To 200b = Truek = 2j = Int(Sqr(i))D．o While k <= j And bIf I Mod k = 0 Thenb

[单选题](程序说明) 程序功能是计算1～10的阶乘。(程序)SET TAIK OFFC．LEARN＝1D．O WHILE N＜11Y=1(1)? STR (N，2)+“的阶乘是：”+STR (Y，8)(2)E．NDDOSET TAIK ONRETURN(3)PARAMETERS N，YIF N＞1D．O FP WITH N-1，Y(4)E．NDIFRETURN(1)A．DO FP WITH N-1，YB．DO FP WITH N，Y-1C．DO FP WITH N，YD．DO FP WITH N-1，Y