2000年4月二级笔试试题foxbase+.txt

c++的大量习题,对二级考试大有帮助. 希望大家满意.

郭昊 26 男
执行以上命令序列后,所显示的记录号是
A) 2 B) 3 C) 4 D) 20
(39) 以下有关FoxBASE过程文件的叙述,其中正确的是
A) 先用SET PROCEDURE TO 命令关闭原来已打开的过程文件,
然后用DO <过程名> 执行
B) 可直接用 DO <过程名> 执行
C) 先用SET PROCEDURE TO <过程文件名>命令打开过程文件,
然后用USE <过程名> 执行
D) 先用SET PROCEDURE TO <过程文件名>命令打开过程文件,
然后用DO <过程名> 执行
(40) 为显示年龄为10的整数倍的在职职工记录,下列各命令中错误的是
A) LIST FOR MOD(年龄,10)=0
B) LIST FOR 年龄/10=INT(年龄/10)
C) LIST FOR SUBSTR(STR(年龄,2),2,1)="0"
D) LIST FOR 年龄=20.OR.30.OR.40.OR.50.OR.60
(41) 索引文件打开后,下列命令中不受索引影响的是
A) LIST B) SKIP C) GOTO 50 D) LOCATE
(42) 下面有关关联操作的说明,其中错误的是
A) 关联本身并不进行具体的数据操作,在关联的基础上进行什么数据操作由 其它命令完成。
B) 只在两个数据库具有同名字段或相同值域字段的情况下才能按字段建立关联。
C) 在当前工作区对其他工作区的被关联数据库的数据可任意读写，即对子数据库的数据既能使用又能修改和追加。
D) 关联的作用是单向的，即当前数据库记录指针的定位影响被关联数据库的记录指针定位，而不可能出现相反方向的影响。
(43) 数据库中有"完成定额否"(逻辑型)字段,完成定额其值为逻辑真,否则为逻辑假。另外有"奖金"(数值型)字段,现给完成定额者发奖金200元,没完成者不给,应使用命令
A) REPLACE 奖金 WITH 200 FOR 完成定额否=.T.
B) REPLACE ALL 奖金 WITH 200 FOR 完成定额否=.T.
C) REPLACE 奖金 WITH 200 FOR 完成定额否
D) REPLACE 奖金 WITH 200 FOR !完成定额否
(44) 要使用数组数据更新当前数据库的当前记录,应使用命令
A) SCATTER TO <数组名>
B) DIMENSION <数组名>
C) APPEND FROM <数组名>
D) GATHER FROM <数组名>
(45) 在数据库应用系统中,为数据安全使用口令程序。要使输入的口令不在屏幕上显示,在口令输入命令的前后应分别使用命令
A) SET CONSOLE ON 和 SET CONSOLE OFF
B) SET CONSOLE OFF 和 SET CONSOLE ON
C) SET CONFIRM OFF 和 SET CONFIRM ON
D) SET DELETED OFF 和 SET DELETED ON
(46) 下列命令用于显示1968年及其以前出生的职工记录,其中错误的是
A) LIST FOR YEAR(出生日期)<=1968
B) LIST FOR SUBSTR(DTOC(出生日期),7,2)<="68"
C) LIST FOR LEFT(DTOC(出生日期),7,2)<="68"
D) LIST FOR RIGHT(DTOC(出生日期),2)<="68"
(47) 设库存数据库stock.dbf(商品名,单价,数量,总金额)在1工作区打开;销售数据库sale.dbf(商品名,数量)在2工作区打开。两个数据库都按商品名建立了索引文件并分别打开。当前工作区为1区，要求用销售数据去修改库存数据，应使用命令
A) REPLACE 数量 WITH 数量-B->数量,总金额 WITH 数量*单价
B) UPDATE ON 商品名 FROM B REPLACE ;
数量 WITH 数量-B->数量,总金额 WITH 数量*单价
C) UPDATE ON 商品名 FROM B REPLACE ;
数量 WITH 数量-B->数量,总金额 WITH B->数量*单价
D) UPDATE ON 商品名 FROM B REPLACE ;
总金额 WITH B->数量*单价,数量 WITH 数量-B->数量
(48) 设学生数据库st.dbf(学号,姓名,所在系)在1工作区打开;学生选修课程数据库sc.dbf(学号,课程号)在2工作区打开。当前工作区为1区,要求用物理连接产生一个数据库qaz.dbf,使其包含选修了C101课程的学生姓名和所在系。应使用命令
A) JOIN WITH B TO qaz FOR 学号=B->学号 .AND. B->课程号="C101"
B) JOIN WITH B TO qaz FIELDS 姓名,所在系;
FOR 学号=B->学号 .AND. B->课程号="C101"
C) JOIN WITH B TO qaz FOR 学号=B->学号 .OR. B->课程号="C101"
D) JOIN WITH B TO qaz FIELDS 姓名,所在系 FOR B->课程号="C101"
(49) 执行如下命令序列
ANS="STUDENT.DBF"
MYFILE=SUBSTR(ANS,1,AT(".",ANS)-1)
?MYFILE
最后显示的变量MYFILE值为
A) STUDENT.DBF B) STUDENT
C) STUDENT.ANS D) 11
(50) 执行以下命令序列:
USE ZGGZ
SUM 工资 FOR 工资>=500 TO QWE
COPY TO QAZ FIELDS 职工号,姓名 FOR 工资>=500
USE QAZ
NUM=RECCOUNT()
AVER=QWE/NUM
?AVER
最后显示的值是
A) 所有工资在500元以上的职工人数
B) 所有工资在500元以上的职工人平均工资数
C) 所有职工的平均工资数
D) 出错
二、填空题(每空2分，共40分) 
请将每空的正确答案写在答题卡上【1】-【20】序号的横线上，答在试卷上不得分。
(1) 计算机网络按通信距离来划分,可分为局域网和广域网。因特网属于 【1】 。
(2) 当前盘是C,确保在D盘的根目录下建立一个子目录USER的一条DOS命令是 【2】 。
(3) 要将当前盘当前目录中所有扩展名为.TXT的文件内容显示在屏幕上的DOS命令
是 【3】 。
(4) DOS命令分为内部命令和外部命令,CHKDSK命令是 【4】 命令。
(5) 在Windows中,为了终止一个应用程序的运行,首先单击该应用程序窗口中的控
制菜单框,然后在控制菜单中单击 【5】 命令。
(6) 请用代表字符填写以下FoxBASE表达式的数据类型:
EOF()的数据类型是 【6】 ;
YEAR(DATE())的数据类型是 【7】 ;
DATE()-6的数据类型是 【8】 。
在做(7)-(13)题之前请先阅读下列数据库的内容:
设有商品数据库文件SP1.DBF,其中商店名、商品名和品牌为字符型字段,单价和库存量为数值型字段,是否进货为逻辑型字段。该数据库已经打开,
(7)-(13)题的操作均基于该数据库。
Record# 商店名 商品名 品牌 单价 库存量 是否进货
1 光明商场 电冰箱 海尔 3700 60 .F.
2 长安商场 空调 科龙 3600 27 .T.
3 百货大楼 彩电 长虹 2450 60 .F.
4 赛特购物中心 洗衣机 小鸭 1600 90 .F.
5 蓝岛东区 空调 美的 2800 26 .T.
6 长安商场 电冰箱 海尔 3700 20 .T.
7 赛特购物中心 彩电 康佳 2980 32 .F.
8 百货大楼 洗衣机 松下 1780 12 .T.
(7) 假设本月光明商场销售出20台海尔冰箱,现对商品数据库SP1.DBF进行更新,应使用的命令:
【9】 FOR 商品名="光明商场".AND.商品名="电冰箱".AND.品牌="海尔"
(8) 使用命令INDEX ON 商店名+STR(9999-单价) TO DX 对商品数据库SP1.DBF建立
索引之后,再用LIST显示,最后一条记录的品牌字段显示的是 【10】
(9) 要将所有库存量低于30的商品的"是否进货"字段修改为逻辑真,应使用的命令: 【11】 FOR 库存量<=30
(10) 用 【12】 命令可以将另一个具有相同结构的库文件SP2.DBF中的所有记录追加 到SP1.DBF数据库的末尾。
(11) 要把SP1.DBF中各个字段的结构作为记录复制到库文件SPS.DBF中,应使用的命令:
COPY TO SPS 【13】
(12) 要显示SP1.DBF库文件所有商店销售的空调平均单价、平均库存量,应使用的命令:
【14】 库存量,单价 FOR 商品名="空调"
(13) 请阅读下列程序,并将程序填写完整。
SET TALK OFF
STORE "Y" TO YN
USE SP1
INDEX ON 品牌 TO PP
DO WHILE 【15】
ACCEPT "请输入查询的品牌:" TO CHX
SEEK 【16】
IF 【17】
DISPLAY
ELSE
?"无此品牌商品!"
ENDIF
WAIT "继续查找吗?(Y/N)" TO YN
ENDDO
?"再见!!"
SET TALK ON
RETURN
(14) 请阅读下列判断一个自然数是否为质数的程序,并将程序填空完整。
SET TALK OFF
INPUT "请输入一个大于1的自然数:" TO N
K=0 &&K的值为0表示所输入的自然数是质数,为1表示不是质数
J=2
DO WHILE J<N
IF MOD(N,J) 【18】
【19】
LOOP
ELSE
K=1
EXIT
ENDIF
ENDDO
IF K=0
? 【20】 +" 是质数"
ENDIF
?"再见!!"
SET TALK ON
RETURN
「完」

全国计算机等级考试FoxBASE参考答案
2000年4月
一、选择题((1)--(40)题每题1分，(41)--(50)题每题2分，共60分。
(1)A (2)C (3)C (4)D (5)D (6)A (7)C (8)C (9)D (10)B
(11)C (12)D (13)D (14)B (15)D (16)B (17)C (18)B (19)B (20)B
(21)D (22)A (23)D (24)B (25)D (26)C (27)D (28)A (29)D (30)B
(31)C (32)A (33)B (34)A (35)A (36)B (37)B (38)C (39)D (40)D
(41)C (42)C (43)C (44)D (45)B (46)C (47)B (48)B (49)B (50)B
二、填空题(每空2分，共40分)
(1) 广域网
(2）MD D：\USER
(3) COPY *.TXT CON
(4) 外部
(5) 退出或关闭
(6) L
(7) N
(8) D
(9) REPL ALL 库存量 WITH 库存量-20 （ALL 可以没有）
(10) 小鸭
(11) REPL ALL 是否进货 WITH .T. (ALL 可以没有)
(12) APPE FROM SP2
(13) STRU EXTE
(14) AVER
(15) UPPER(YN)="Y" 或 LOWER(YN)="y" 或 YN="y" .OR.YN="Y"
(16) CHX
(17) FOUND()
(18) <>0
(19) J=I+1
(20) STR(N)