第十章练习题.docx
- 文档编号:16270963
- 上传时间:2023-07-12
- 格式:DOCX
- 页数:19
- 大小:19.37KB
第十章练习题.docx
《第十章练习题.docx》由会员分享,可在线阅读,更多相关《第十章练习题.docx(19页珍藏版)》请在冰点文库上搜索。
第十章练习题
第十章练习题
一、选择题
1.将逻辑值赋给内存变量LZ的正确方法是:
A)LZ=“.T.”B)STORE“T”TOLZ
C)LZ=TRUED)STORE.T.TOLZ
2.将98年国庆节的日期赋给内存变量ND的正确方法是:
A)ND=DTOC(“10/01/98”)B)ND=CTOD([10/01/98])
C)STOREDATE()TONDD)STORE10/01/98TOND
3.执行命令INPUT“请输入出生日期:
”TOMDATE时,如果通过键盘输入CTOD(“01/01/88”)则内存变量MDATE的值应当是:
A)CTOD(“01/01/88”)B)“01/01/88”
C)日期值01/01/88D)拒绝接收,MDATE不赋值
4.在DOWHILE.T.的循环中,退出循环应使用的命令是:
A)LOOPB)EXITC)CLOSED)CLEAR
5.下列程序的运行结果是:
A=10
IFA=10
S=0
ENDIF
S=1
?
S
A)0B)1C)程序出错D)结果无法确定
6.有如下的程序:
M=0
N=0
DOWHILEN>M
M=M+N
N=N-10
ENDDO
?
M
运行此程序后M的值为:
A)0B)10C)100D)99
7.有如下程序:
SETTALKOFF
STORE2TOS,K
DOWHILES<14
S=S+K
K=K+2
ENDDO
?
S,K
SETTALKON
RETURN
此程序运行后的输出结果是:
A)2210B)228
C)148D)14108.执行如下程序:
SETTALKOFF
S=0
I=1
INPUT“N=?
”TON
DOWHILES<=N
S=S+1
I=I+1
ENDDO
?
S
SETTALKON
如果输入N的值为5,则最后S的显示值是:
A)1B)3C)5D)6
9.有如下的程序:
SETTALKOFF
M=0
N=100
DOWHILEN>M
M=M+N
N=N-10
ENDDO
?
M,N
RETURN
运行此程序的显示结果为:
A)010B)1090C)90100D)10090
10.执行语句DIMENSIONM(3),N(2,3)后,数组M和N的元素个数分别为:
A)1个,2个B)3个,6个C)3个,5个D)4个,12个11.运行下列程序后,语句?
”123”被执行的次数是:
I=0
DOWHILEI<10
IFINT(I/2)=I/2
?
”123”
EDNIF
?
”ABC”
I=I+1
ENDDO
RETURN
A)10B)5C)11D)6
12.在程序中,如果先用命令DIMENSIONQ(2,3)定义了一个数组,再对每个下标变量赋值,Q(1,1)=1,Q(1,2)=2,Q(1,3)=3,Q(2,1)=4,Q(2,2)=5,Q(2,3)=6,然后执行命令?
Q
(2),则显示的结果为:
A)变量未定义B)4C)2D).F.
13.运行如下程序的结果是:
SETTALKOFF
DIMENSIONK(2,3)
I=1
DOWHILEI<=2
J=1
DOWHILEJ<=3
K(I,J)=I*J
?
?
K(I,J)
?
?
””
J=J+1
ENDDO
?
I=I+1
ENDDO
RETURN
A)123B)12C)123D)123
24632123249
14.假设当前数据表中有5个字段:
学号(C)、姓名(C)、政治(N)、英语(N)、数学(N),当前记录指针指向一个非空的记录,有如下命令序列:
DIMENSIONX(3)
SCATTERTOX
LISTMEMORY
顺序执行上述命令之后,数组各元素的值分别是:
A)数组各元素的值是一串*号,表示数据溢出
B)有5个数组元素X
(1)、X
(2)、X(3)、X(4)、X(5),分别是当前记录各个字段值
C)有3个数组元素X
(1)、X
(2)、X(3),分别是当前记录的前3个字段值
D)有3个数组元素X
(1)、X
(2)、X(3),分别从当前记录开始,连续3个记录的学号字段值
15.能够把数组的值存入数据表当前记录的命令是:
A)STOREB)REPLACE
C)SCATTERD)GATHER
16.有如下程序,执行命令DOZCX后,屏幕显示的结果为:
主程序ZCX.PRG子程序ZCX1.PRG
SETTALKOFFK1=K1+’200’
K1=’AB’?
K1
DOZCX1RETURN
?
K1
RETURN
A)ABB)AB200C)AB200D)200
AB200AB200AB200
17.有如下程序,执行命令DOZZ后,屏幕显示的结果是:
主程序ZZ.PRG子程序Z1.PRG子程序Z2.PRG
SETTALKOFFX2=X2+1X3=X3+1
STORE2TOX1,X2,X3DOZ2RETURNTOMASTER
X1=X1+1?
X1+X2+X3
DOZ1RETURN
?
X1+X2+X3
RETURN
A)9B)5C)8D)4
18.有如下程序:
主程序SS.PRG子程序SUB1.PRG
SETTALKOFFPARAMETERA,B
X=10X=A+10
A=2A=A+B
B=3?
X,A,B
DOSUB1WITHA,BRETURN
DOSUB1WITHA,B
?
X,A,B
SETTALKON
RETURN
执行命令DOSS之后,第1行输出的结果是:
A)1053B)1253C)1285D)都不对二、填空题
1.有3个数A,B,C,其中两个数相等,而另一个数比其他两个数都大,下列程序段的功能是找出其中最大的那个数,请填空。
DOCASE
CASE
(1)
?
“C=”,C
CASE
(2)
?
“B=”,B
CASE(3)
?
“A=”,A
ENDCASE
2.程序A.PRG的功能是求1到100之间所有整数的平方和并输出结果,请填空。
SETTALKOFF
CLEAR
S=0
X=1
DOWHILEX<=100
(1)
(2)
ENDDO
?
S
RETURN
3.阅读下列程序,并给出运行结果。
SETTALKOFF
CLEAR
STORE1TOX
STORE20TOY
DOWHILEX<=Y
IFINT(X/2)<>X/2
X=1+X^2
Y=Y+1
LOOP
ELSE
X=X+1
ENDIF
ENDDO
?
X
?
Y
SETTALKON
运行结果X的值为:
,Y的值为:
。
4.有如下程序:
SETTALKOFF
I=1
DOWHILEI<=2
CLEAR
INPUT“A=”TOA
IFA>INT(A).OR.A>=10
LOOP
ELSE
INPUT“B=”TOB
IFB=INT(B).AND.B<10
LOOP
ELSE
?
A,”+”,B,”=”,A+B
ENDIF
ENDIF
I=I+1
ENDDO
执行以上程序,如果依次输入数据2.5,8,2.5,3,2,2,10,则输出结果是以及。
5.下列程序的功能是删除输入字符串中所含的空格,请填空。
SETTALKOFF
ACCEPT“请输入字符:
”TOX
I=2
DOWHILE“”$X
I=AT(“”,X)
(1)
I=I+1
ENDDO
?
X
RETURN
6.执行下列程序,如果依次输入数据2,3.5,3.5,3,2,2,3,则输出结果是。
SETTALKOFF
I=1
DOWHILEI<=2
CLEAR
INPUT“A=”TOA
IFA<>INT(A).OR.A<1.OR.A>99
LOOP
ELSE
?
?
A,”+”,B,”=”,A+B
ENDIF
I=I+1
ENDDO
7.下列程序的功能是对ABC.DBF中的字段“数量”里的数,求其偶数之和,并显示所有偶数,请填空。
SETTALKOFF
USEABC
S=0
DOWHILE.T.
IF
(1)
?
数量
S=S+数量
ENDIF
(2)
IFEOF()
(3)
ENDIF
ENDDO
?
S
RETURN
8.请阅读下列程序,并根据运行结果填空。
SETTALKOFF
M=1
DOWHILEM<5
N=1
?
?
M
DOWHILEN TT=N+M ? ? TT N=N+1 ENDDO ? M=M+1 ENDDO RETURN 此程序共显示行数据,第1行是,最后一行是。 9.共有5个数据表文件STD1.DBF~STD5.DBF,下列程序的功能是删除每个表文件的最后一条记录,请填空。 N=1 DOWHILEN<=5 DB= (1) USE&DB GOTOBOTTOM DELETE PACK N=N+1 ENDDO USE 10.下列程序逐行显示职称为教授的数据记录,请填空。 USETEACHER DOWHILE.NOT.EOF() CLEAR IF职称<>“教授” SKIP (1) ENDIF DISPLAY WAIT“按任意键继续! ” SKIP ENDDO USE 11.填空完成下列程序: SETTALKOFF USESTD ACCEPT“请输入待查学生姓名: ”TOXM DOWHILE.NOT.EOF() IF (1) ? “姓名: ”+姓名,“成绩: ”+STR(成绩,3,0) ENDIF SKIP ENDDO SETTALKON RETURN 12.已经建立了工资数据表文件GZ.DBF,在下列程序中要求修改水电费字段值,请填空。 SETTALKOFF CLEAR USEGZ ACCEPT“要将水电费字段清零吗? (Y/N)”TOP IF (1) REPLACEALL水电费WITH0 ENDIF GOTOP BROWSEFIELDS姓名,水电费 USE RETURN 13.下列程序的功能是从键盘接受到Y或N才退出循环,请填空 DOWHILE.T. WAIT“请输入Y/N”TOYN IF((UPPER(YN)<>”Y”).AND.(UPPER(YN)<>”N”)) (1) ELSE EXIT ENDIF ENDDO 14.计算机等级考试的查分程序如下,请填空: USESTUDENT ACCEPT“请输入准考证号: ”TONUM LOCATEFOR准考证号=NUM IF (1) ? 姓名+“的成绩是: ”+STR(成绩,3,0) ELSE ? “没有此考生! ” ENDIF USE 15.计算机等级考试考生数据表为STUDENT.DBF。 笔试和上级成绩已分别录入其中的“笔试”和“上机”字段(均为数值型)中,此外另有“等级”字段(字符型)。 凡两次考试均达到80分以上者,应在等级字段中填入“优秀”。 为此编写如下程序,请填空。 SETTALKOFF USESTUDENT DOWHILE.NOT.EOF() IF笔试>=80.AND.上机>=80 (1) ENDIF SKIP ENDDO USE SETTALKON 16.阅读下列程序,回答指定问题。 SETTALKOFF CLEAR USESALARY DOWHILE.NOT.EOF() IF实发工资>=250 SKIP LOOP ENDIF DISPLAY SKIP ENDDO CLOSEDATABASE RETURN 该程序完成的功能是;LOOP语句的功能是。 17.假设有商品数据表文件SP1.DBF,其中商店名、商品名和品牌微字符型字段,单价和库存量为数值型字段,是否进货为逻辑型字段。 该数据表记录如下: 记录号商店名商品名品牌单价库存量是否进货 1光明商店电冰箱海尔370060.F. 2长安商店空调科龙360027.T. 3百货大楼彩电长虹245060.F. 4塞特购物中心洗衣机小鸭160090.F. 5蓝岛东区空调美的280026.T. 6长安商场电冰箱海尔370020.T. 7塞特购物中心彩电康佳298032.F. 8百货大楼洗衣机松下178012.T. 请阅读下列程序,并将程序填写完整。 SETTALKOFF STOR“Y”TOYN INDEXON品牌TOPP DOWHILE (1) ACCEPT“请输入查询的品牌: ”TOCHX SEEK (2) IF(3) DISPLAY ELSE ? “无此品牌商品! ” ENDIF WAIT“继续查找吗? (Y/N)”TOYN ENDDO ? “再见! ” SETTALKON RETURN 18.有口令程序如下: SETTALKOFF CLEAR DOWHILE.T. @5.20SAY“请输入口令: ” INPUTTOPW IFDATE()=PW EXIT ELSE WAIT“口令不对,按任意键重来! ” CLEAR ENDIF ENDDO SETTALKON CLEAR 假设今天是1999年10月15日,为通过该口令程序,应输入的口令是。 19.下列程序用于在屏幕上显示一个由“*”组成的三角形(如下图),请填空。 *SETTALKOFF ***CLEAR *****R=1 *******CC=10 DOWHILER<=4 S=1 DOWHILES<=2*R-1 @R,CCSAY“*” CC=CC+1 S=S+1 ENDDO CC=10-R (1) ENDDO 20.下列程序要求计算每位职工的税金,并将计算结果填入工资数据表GZ.DBF中相应职工的税金字段(本单位职工最高工资为2500元),请填空。 *主程序MAIN.PRG SETTALKOFF TAX=0 USEGZ DOWHILE.NOT.EOF() SHFZ=实发工资 DOSUB ? TAX REPLACE税金WITHTAX (1) ENDDO USE RETURN *子程序SUB.PRG (2) X=0 DOCASE CASEA>800.AND.A<1300 X=(A-800)*0.05 CASEA>=1300.AND.A<1800 B=A-1300 X=B*0.1+500*0.05 CASEA>1800.AND.A<2300 B=A_1800 X=B*0.15+500*0.1+500*0.05 ENDCASE RETURN 21.阅读下列程序,并写出执行A.PRG的显示结果。 *A.PRG*B.PRG M=1PRIVATEM N=2M=3 DOB.PRGN=4 ? ”M=”,M,”N=”,NRETURN RETURN 在命令窗口中执行DOA命令后,屏幕上显示的结果是。 22.下列是一个计算阶乘的程序,请填空: *P.PRG*PP.PRG SETTALKOFFPROCEDUREP1 (1)S=S*Y STORE1TOX,YY=Y+1 INPUT“请输入正整数: ”TOXIFY>X DOP1 (2) ? STR(X)+”! =”+STR(S)ENDIF RETURNRETURN 23.请阅读下列程序,并回答指定问题。 *主程序AAA.PRG*过程文件BBB.PRG SETTALKOFFPROCEDURESUBPRO CLEARPARAMETERSQ SETPROCEDURETOBBBQ=200 P=100RETURN DOSUBPROWITHP @5,5SAY“P=”+STR(P,3) RETURN 执行该程序后,屏幕上显示的信息为。
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 第十 练习题