(程序说明) 程序功能是按姓名提供学生成绩的查询。

(程序)

SET TALK OFF

USE STD

A．CCEPT“请输入待查学生姓名：”TO XM

D．O WHILE (4)

IF (5)

?“姓名：”+姓名，“成绩：”+STR (成绩，3，0)

E．NDIF(6)

E．NDDO

SET TALK ON

RETURN(4)

A．BOF ()

B．EOF ()

C．NOT. EOF()

D．NOT. BOF()

[单选题](程序说明)程序功能是求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

[单选题](程序说明) 程序功能是求1到100之间的所有素数。(程序)SET TALK OFFC．LEARJ=2D．O WHILE J＜＝100I＝2D．O WHILE (5)IF MOD(J，I)＝0(6)E．NDIFI＝I+1E．NDDOIF (7)?JE．NDIFJ=J+1(8)SET TALK ONRETURN(5)A．I＞JB．I＞＝JC．I＜JD．I＜＝J

[单选题](程序说明)程序功能是计算一个整数的各位数字之和。(程序)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 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

[单选题](程序说明) 求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

[单选题](程序)SET TALK OFFC．LEARINPUT“N=”TO NINPUT“M=”TO MX=MIN(N，M)F．OR I＝X TO 1 STEP -1IF M/I＝INT(M/I)AND N/I=INT(N/I)Y1=IE．XITE．NDIFE．NDFOR?“Y1=”+ALLTRIM(STR(Y1，19))+“，Y2＝”+ALLTRIM(STR(M，N)/Y1，19))SET TALK ON若输入N、M的值分别为6，8，则Y1的输出结果为 ______。A．0B．1C．2D．3

[单选题](程序)SET TALK OFFC．LEARSTORE 10 TO ASTORE 20 TO BSET UDFPARMS TO REFERENCED．O SWAP W1TU A，(B)? A，BPROCEDURE SWAPPARAMETERS X1，X2TEMP＝X1X1＝X2X2＝TEMPE．NDPROCSET TALK ONRETURNA．的输出结果为 ______。A．10B．20C．30D．5

[单选题](程序说明) 程序功能是计算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