资源描述：
《笔试读程序题分析(s18-29)cp18》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、笔试题读程序分析（S18-29）一、循环18.1计数循环套IFmod()累加器CLEARM=0FORX=1TO10IFMOD(X,3)=0M=M+XENDIFENDFOR?MRETU(1)程序的功能是(A)求1-10之间能被3整除数的个数(B)求1-10之间能被3整除数的和.(C)求1-10之间不能被3整除数的个数(D)求1-10之间不能被3整除数的和(2)程序的结果是(A)3(B)10(C)18.(D)3718.5类似26.1表扫描型循环套IF选择库表、自由表指针位置CLEAROPENDATABASEemplorerUSEcom
2、penSCANFORRECNO()<=10IF姓名=”李强”LOOPENDIF?姓名,实发工资ENDSCANUSECLOSEDATA(1)compen是(A)自由表(B)数据库表(C)数据库(D)可能是自由表，也可能是数据库表.(2)若数据库有50条记录，则程序功能为(A)前10条记录中搜索“李强”的记录(B)列出前10条记录(C)每10条记录一屏显示记录，但不显示“李强”的记录(D)列出前10条记录，但不显示“李强”的记录.(3)循环结束后，记录指针指向(A)第1条记录(B)最后1条记录(C)第10条记录(D)最后1条记录加1.
3、19.1条件循环屏幕坐标计数器CLEARALLSTORE1TOJ,KDOWHILEK<5＠J,KSAY“*”K=K+1ENDDORETU(1)屏幕（显示）的起始坐标为(A)l，5(B)0，0(C)l，l.(D)任意(2)程序执行后J，K的值是(A)l，5.(B)5，5(C)0，0(D)l，l019.2条件循环功能循环变量值设XS.DBF有10条记录USEXSGOBOTTOMN=3DOWHILEN>=lDISPLAYSKIP-lWAITN=N-1ENDDOUSERETU(1)程序的功能是(A)显示所有记录(B)分别显示前3个记录(C
4、)显示第3个记录(D)分别显示后3个记录.(2)退出循环后，N的值是(A)0.(B)l(C)3(D)420.1绝对循环功能计数器累加器（初值，位置）STORE0TOH,KDOWHILE.T.K=K+1H＝H+KIFK>=10EXITENDIFENDDO?＂H=＂+STR(H,4)RETURN(1)该程序的功能是(A)计算1-10的整数之和.(B)计算1-9的整数之和(C)计算1-1l的整数之和(D)计算1-10以内的数之和(2)该程序运行的结果是(A)55(B)66(C)h=55.(D)h=6622.1计数循环套IF数位值FORK
5、=100TO400A=INT(K/100)B=INT((K-100*A)/10)C=K-INT(K/10)*10IFK=100*C+10*B+A?KENDIFENDFOR/RETU(1)程序完成的功能是(A)显示100-400之间所有既能被10整除又能被100整除的数(B)显示100-400之间所有能被10整除的数(C)显示100-400之间所有能被100整除的数(D)显示100-400之间所有百位与个位交换后其值相等的数.(2)能代替B=INT((K-100*A)/10)这条命令的是(A)B=VAL(LEFT(STR(K,3),
6、1)(B)B=VAL(SUBSTR(STR(K,3),2,1)).(C)B=VAL(RIGHT(STR(K,3),1))(D)上述选择都不正确(3)IFK=100*C+10*B+A/?K/ENDIF这段程序的功能是(A)判断K是否等于A,B,C三个数的和,如果是则显示K(B)判断K是否等于个位与百位交换后的值,如果是则显示K.(C)判断A,B,C三个数是否为整数,如果是则显示K(D)上述选择都不正确(4)将”IFK=100*C+10*B+A”语句替换为”IFK=A*A*A+B*B*B+C*C*C”程序完成的功能是(A)将100-4
7、00之间能被100整除的数显示(B)将100-400之间能被10整除的数显示(C)将100-400之间该数的每位的立方和等于该数的数显示.(D)将100-400之间的素数显示22.6条件双循环变量值C型累加器（初值，位置）CLEAX=1DOWHILEX<=5Y=1C=”$”DOWHILEY<=XC=C+STR(Y,1)Y=Y+1ENDDOIFX=5?CENDIFX=X+1ENDDO?X/RETU(1)执行以上程序后，第一条？命令显示变量C的结果为(A)$54321(B)$12345.(C)54321(D)12345(2)执行以上程
8、序后，第二条？命令显示变量X的结果为(A)6.(B)5(C)$6(D)$523.1计数循环套多路分支MOD()INT()CLEAR/STORE0TOA,B,CFORI=1TO10DOCASECASEMOD(I,2)=0A=A+I/2CASEINT(
