第一部分 选择题 (共40分)

一、单项选择题(本大题共20小题，每小题2分，共40分)在每小题列出的四个选项中只有一个是符合题目要求的。请将其代码填在题后的括号内。错选或未选均无分。

1.在数据库系统中，面向用户、也就是用户所涉及的数据库被称为( )

A.外模式 B.概念模式

C.存储模式 D.模式

2.数据模型表示的是数据库框架，要构建为数据库，必须在框架的约束下填上( )

A.具体数据 B.取值范围

C.联系 D.联系方式

3.学生实体通过“学号”、“姓名”、“年龄”、“性别”和“成绩”等属性来表明学生状况，这是( )

A.实体值 B.实体型

C.属性值 D.属性型

4.设一个仓库存放多种商品，同一种商品只能存放在一个仓库中，仓库与商品是( )

A.一对一的联系 B.一对多的联系

C.多对一的联系 D.多对多的联系

5.将1NF规范为2NF，应( )

A.消除了非主属性对键的部分函数依赖

B.消除了非主属性对键的传递函数依赖

C.消除了主属性对键的部分函数依赖和传递函数依赖

D.使每一个非主属性都完全函数依赖于主键

6.建立E—R模型的工作属于数据库生命周期中的( )

A.分析阶段 B.设计阶段

C.编码阶段 D.测试阶段

7.针对数据库文件的某个关键字段的值，在逻辑上重新排列库文件顺序所建立的文件称为

( )

A.文本文件 B.索引文件

C.排序文件 D.命令文件

8.已知a=″car″,b=″bus″,c=″class″,d=″duck″,e=MIN(a,b,c,d)，则e等于( )

A.duck B.class

C.bus D.car

9.使下列程序不能正确运行的是( )

STORE _______ TO add

STORE ″20&add.10″ TO result

? &result

A.{+} B.′+′

C.″+″ D.[+]

10.已知DIMENSION aa(2,3)，该数组的第2个数组元素是( )

A.aa(0,1) B.aa(1,0)

C.aa(1,2) D.aa(2,1)

11.计算表达式3+5>4.AND.″ab″-″c″＄″babcd″的值时，运算顺序为( )

A.+>.AND.-＄ B..AND.＄+->

C.+-＄>.AND. D.+.AND.＄->

12.执行语句″?LEN(SUBSTR(REPLICATE(″*″,10),4,5))″后输出( )

A.5 B.2

C.4 D.6

13.FoxPro中APPEND BLANK命令的功能是在当前已打开的数据库文件( )

A.末尾追加一条空记录

B.顶部追加一条空记录

C.当前记录前追加一条空记录

D.当前记录后追加一条空记录

14.FoxPro中不能对数据库文件中记录进行操作的命令是( )

A.EDIT B.CHANGE

C.BROWSE D.MODIFY

15.数据库文件已按“专业”字段进行索引，并已打开索引文件，对各专业总分进行分类求和的命令是( )

A.TOTAL ON ″总分″ TO cjzf

B.TOTAL ON ″专业″ TO cjzf FIELDS 总分

C.TOTAL ON 总分 TO cjzf

D.TOTAL ON 专业 TO cjzf FIELDS 总分

16.当前打开的一个数据库文件中有20条记录，运行命令″?EOF( )″的结果为.T.，则运行命令″? RECNO( )″的结果是( )

A.20 B.21 C.0 D.1

17.在某图书数据库中已按图书名字段创建的索引文件已打开，并已对变量name1赋值“高等数学”，要使用name1来查找图书，应使用的命令是( )

A.SEEK &name1 B.FIND name1

C.FIND &name1 D.LOCATE FOR name1

18.FoxPro中有关变量赋值语句正确的描述是( )

A.ACCEPT能够对数值型变量赋值

B.INPUT只能对数值型变量赋值

C.ACCEPT、INPUT都能对字符型变量赋值

D.STORE一次只能对一个内存变量赋值

19.建立过程文件的FoxPro命令是( )

A.MODIFY COMMAND B.MODIFY PROCEDURE

C.CREATE COMMAND D.CREATE PROCEDURE

20.以下程序结构中错误的是( )

A.IF… B.IF… C.DO WHILE… D.DO WHILE…

┇ ┇ ┇ ┇

DO WHILE… ENDIF IF… IF…

┇ ┇ ┇ ┇

ENDDO DO WHILE ENDIF ENDDO

┇ ┇ ┇ ┇

ENDIF ENDDO ENDDO ENDIF

第二部分 非选择题 (共60分)

二、填空题(本大题共10小题，每小题1分，共10分)

不写解答过程，将正确的答案写在每小题的空格内。错填或不填均无分。

21.数据库维护功能包括：数据库初始装入，数据库转储，_______及记载系统工作日志等功能。

22.每个数据均需指明其数据类型和取值范围，这是数据_______约束所必需的。

23.在数据库系统中的数据模型有层次模型、_______、关系模型。

24.联系也是实体，所以联系也可以有_______。

25.若关系R∈2NF，且它的每一个非主属性都_______，则称R∈3NF。

26.在数据字典中，对数据流“住户”表示为：住户=姓名+房号+面积，定义了组成该数据流的_______。

27.建立局部E—R图时，根据数据流图中对数据的加工确定实体之间的_______。

28.对关系模式执行“分解”时，必须遵循规范化原则：分解后的关系要相互独立且分解必须是_______。

29.面向对象的方法把对象的属性和_______集成到一个对象中。

30.FoxPro在屏幕上激活窗口W的命令是_______。

三、程序分析题(本大题共3小题，每小题5分，共15分)

31.写出下列程序的运行结果：

SET TALK OFF

STORE 3 TO x

y=1

x=x*y

y=y+1

sf=″**″

ss=″x″+″&″+″sf.″+″y″

?″abc=″+STR(x,2)+′-′+STR(&ss,4)

SET TALK ON

RETURN

程序执行结果：

33.数据库文件xsk.dbf的内容如下：

编号 名称 数量 单价

A001 电视机 20 3500

A002 摄象机 33 6000

A001 电视机 31 3500

B001 洗衣机 10 1200

B002 冰 箱 15 2300

阅读下列程序

SET TALK OFF

SET DELETED ON

USE xsk

DELETE FOR 编号=″A001″

GO 2

DELETE

RCALL FOR 数量<30

COUNT TO sj

? sj

USE

SET TALK ON

RETURN

程序执行结果：

33.给出下述程序的执行结果。

SET TALK OFF

CLEAR

n=52

p=2

DO WHILE n< >1

IF INT (n/p)=n/p THEN

? p

n=INT(n/p)

ELSE

p=p+1

ENDIF

ENDDO

RETURN

程序执行结果：

四、程序设计(本大题共5小题，每小题5分，共25分)

34.文件star.dbf用于存放演员信息，其字段有sname(姓名，字符型)，sex(性别，字符型)，knum(演电影数，数值型)。下述程序的功能是：查找演员中演电影最少的人数及其所演的电影部数。完成下述程序。

SET TALK OFF

USE star

IF .NOT. EOF( )

minval=knum

num=0

DO WHILE .NOT. EOF( )

IF knum<=minval

IF knum<minval

___(1)____

___(2)____

ENDIF

num=num+1

ENDIF

___(3)____

ENDDO

? STR(num)+STR(minval)

ENDIF

USE

RETURN

(1)

(2)

(3)

35.已知数据库文件stud.dbf存放学生成绩，其字段有：xname(姓名，字符型)，zcj(总成绩，数值型)，xh(学号，字符型)，现要求对学生成绩以降序排列。完成下列程序。

SET TALK OFF

USE stud

FOR k=1 TO ____(1)____

GOTO k

SCATTER TO ary

SCAN REST

IF ____(2)____

SCATTER TO xmp

GATHER FROM ary

FOR n=1 TO ____(3)____

ary(n)=xmp(n)

ENDFOR

ENDIF

ENDSCAN

____(4)____

GATHER FROM ary

ENDFOR

USE

SET TALK ON

RETURN

(1)

(2)

(3)

(4)

36.文件player.dbf用于存放球员信息，其字段有：pname(姓名，字符型)，position(位置，字符型)，goal(得分，数值型)。下述程序的功能是：查找得分最少的所有球员信息。完成下述程序。

SET TALK OFF

USE player

IF .NOT. EOF( )

minval=goal

____(1)____=LTRIM (TRIM(STR(RECNO( )))

SCAN

DO CASE

CASE ____(2)____

minval=goal

rstr=″#″+LTRIM(TRIM(STR(RECNO( ))))

CASE goal=minval

rstr=rstr+″#″+LTRIM(TRIM(STR(RECNO( ))))

ENDCASE

ENDSCAN

LIST FOR AT(″#″+LTRIM(TRIM(STR(RECNO( ))))+″#″,rstr)< >____(3)____

ELSE

?″press.dbf是空的″

ENDIF

USE

RETURN

(1)

(2)

(3)

37.文件lecture.dbf用于存放教师授课信息，其字段有：tname(姓名，字符型)，cname(课程名，字符型)，tyear(讲授时间，数值型)。下述程序的功能是：接收一个教师姓名，若其信息lecture.dbf中则显示相应信息；重复上述过程，直到接收的教师姓名为’#’时，程序结束。完成下述程序。

SET TALK OFF

USE lecture

SCATTER FIELD tname TO tname MEMVAR BLANK

INDEX ON tname TO leature

DO WHILE ____(1)____

CLEAR

@10,10 SAY ″请输入教师姓名″ GET m.tname

READ

IF LTRIM(TRIM(m.tname))< >′#′

SEEK ____(2)____

IF ____(3)____

LOOP

ENDIF

DISPLAY FOR m.tname=tname

WAIT

ENDIF

ENDDO

USE

RETURN

(1)

(2)

(3)

38.文件newsa.dbf和newsb.dbf具有相同的结构，其字段有：newsp(报刊名称，字符型)，price(单价，数值型)。newsa在newsp上建有索引文件newsa.idx,newsb在newsp上建有索引文件newsb.idx,下述程序的功能是：查找在newsa.dbf出现但不在newsb.dbf中出现的报刊名称。

完成下述程序。

SET TALK OFF

SELECT B

USE newsb ALIAS new INDEX newsb

SELECT A

USE newsa ALIAS old INDEX newsa

DO WHILE ____(1)____ .OR..NOT.EOF(″new″)

DO CASE

CASE ____(2)____ .OR..NOT.EOF(″old″).AND.newsp<new->newsp

? newsp

SKIP IN old

CASE EOF(″old″).OR..NOT..EOF(″new″).AND.newsp>new->newsp

____(3)____

OTHER

SKIP

SKIP IN new

ENDCASE

ENDDO

CLEAR ALL

RETURN

(1)

(2)

(3)

五、综合题(本大题共2小题，每小题5分，共10分)

39.说明函数rsum(i)、csum(i)及zsum( )的功能。

SET TALK OFF

SET PROCEDURE TO ulty

DIME ary(3,3)

ary=0

FOR i=1 TO 3

FOR j=1 TO 3

@ 8+2*i,20+15*j GET ary(i,j)

ENDFOR

ENDFOR

READ

FOR i=1 TO 3

? rsum(i),csum(i),zsum( )

ENDFOR

SET PROCEDURE TO

RETURN

文件ulty.prg的内容如下：

FUNCTION rsum

PARAMETER i

PRIVATE msum,j

msum=0

FOR j=1 TO 3

msum=msum+ary(i,j)

ENDFOR

RETURN msum

FUNCTION csum

PARAMETER i

PRIVATE msum,j

msum=0

FOR j=1 TO 3

msum=msum+ary(j,i)

ENDFOR

RETURN msum

FUNCTION zsum

PRIVATE msum,i

msum=0

FOR i=1 TO 3

msum=msum+ary(i,i)

ENDFOR

RETURN msum

rsum的功能是：

csum的功能是：

zsum的功能是：

40.如下描述教学管理的数据库R中记录了教师讲授的课程及教师所属系的情况。

请回答下列问题：

(1)R最高为第几范式?为什么?

(2)是否存在删除操作异常?若存在，试用样值中的例子加以说明。

(3)将它分解为高一级范式，分解后的关系是如何解决分解前所存在的删除操作异常的?