内容发布更新时间 : 2024/12/28 4:30:25星期一 下面是文章的全部内容请认真阅读。

CASE X>200 ??”2” OTHERWISE ??”3” ENDCASE

若在X=300的情况下执行这个程序段，屏幕上将显示_______。 159.执行下列语句序列

A=2.4 DO CASE CASE A>1 B=1

CASE A>2

B=2

ENDCASE

变量B的值是 。 160.给出以下程序的运行结果：

SET TALK OFF X=0 Y=0

DO WHILE X<10

X=X+1 IF INT(X/2)=X/2

LOOP ELSE

Y=Y+X

ENDIF ENDDO ? \RETURN

运行结果为______。 161. 有程序段如下： STORE 0 TO X,Y DO WHILE.T. X=X+1 Y=Y+X IF X＞=10 EXIT ENDIF ENDDO ? Y

执行后的结果是 。

162. 请阅读下列判断一个自然数是否为质数的程序，并将程序填写完整。

SET TALK OFF

INPUT\请输入一个大于1的自然数: \

K=0 &&K的值为0表示所输入的自然数是质数,为1表示不是质数J=2

11

DO WHILE J

IF MOD(N,J) [1] [2] LOOP ELSE K=1 EXIT ENDIF

ENDDO IF K=0

? [3] +\是质数\ ENDIF ? \再见！！\SET TALK ON RETURN

163. 有如下售书数据库BOOK.DBF，BOOK.DBF中的记录如下：

书号 单价 数量 总计 B0168 19.8 3 B6915 12.6 36 B9023 40.0 100 B4682 18.0 40 B6329 28.0 56 B8127 2.0 20

要逐条计算总计并填入“总计”字段之中,计算按照如下规则: 若数量小于等于10,总计等于“单价*数量” 若数量大于50, 总计等于“单价*数量*(1-5/100)” 若数量在11与50之间,总计等于“单价*数量(1-10/100)” 请填空: SET TALK OFF USE BOOK GO TOP

DO WHILE [ 1 ] DO CASE

CASE 数量<=10

REPLACE 总计 WITH单价*数量

CASE [ 2 ]

REPLACE 总计 WITH 单价*数量*(1-10/100) CASE 数量>50

REPLACE 总计 WITH 单价*数量*(1-5/100)

ENDCASE

[3] ENDDO LIST USE SET TALK ON RETURN

12

164. 售书数据库BOOK.DBF(如上题所示)，现需要调整一些书的单价，然后用调整后的“单价*数量”的值填入

“总计”字段，下边程序的功能是根据用户输入的书号查找到记录，并由用户决定是否对该记录进行修改，请填空： SET TALK OFF USE BOOK

INDEX ON 书号 TO BOOKI DO WHILE .T. CLEAR

DISP ALL FIELDS 书号 ACCEPT\请输入书号\ [1] IF FOUND()

DISPLAY

ACCEPT\修改/不修改继续/终止程序(Y/N/E) \ELSE

ACCEPT\书号不存在!继续/终止程序(N/E) \ENDIF DO CASE

CASE UPPER(SR)= \

INPUT\请输入新单价: \

REPLACE [2] ,总计 WITH 单价*数量

CASE UPPER(SR)= \

[3] CASE UPPER(SR)= \

[4] ENDCASE ENDDO USE SET TALK ON

RETURN SET TALK OFF

165. 求阶乘值小于1000的最大的自然数，填空。

CLEAR JC=1 N=1

DO WHILE JC=JC*N

JC<1000 ① ②

? N-1

SET TALK ON RETURN

166. 编写程序，求1+2+??+100的和（S）

SET TALK OFF CLEAR

S=0

FOR N=1 TO 100

13

S=S+N ENDFOR ?S

SET TALK ON RETURN

二、填空题

1、 数据库系统的核心是___________。

2、 在关系数据库的基本操作中，从表中选出满足条件的元组的操作称为________。 3、 实体与实体之间联系的方式有________、________、________三种联系。 4、 用二维表的形式来表示实体之间联系的数据模型叫做________。 5、 表达式 2*3^2+2*8/4+3*2的值是________。 6、 函数 int(123.456) 的值是________。 7、 LEN(“数据库2”) 的计算结果是________。

8、 表达式 NOT(“A”>”B” AND 3*6<20 OR “ART”>”ARS”) 的值是________。 9、 用严格的日期格式写出2011年5月22日________。 10、数组元素的初值为________。

11设N=886，M=345，K=”M+N”，表达式1+&K的值是________。

12表达式VAL（SUBS（”奔腾586”,5,1））*LEN（”Visual FoxPro”）的结果是________。 13、通用型数据的代号为________。

14、依次执行VF=\和ABC=VF命令后，再执行？VF+ABC命令的结果是________。 15、要同时打开多个数据表文件，选择不同的工作区可使用的命令是________。 16、假定X=3，执行命令 ? X=X+1后，其结果是________。 17、恢复删除记录的命令是________。

18、可以伴随着表的打开而自动打开的索引是________。 19、记录指针定位在第一条记录上的命令是________。 20、在表的尾部增加一条空白记录的命令是________。

21、在参照完整性的设置中，如果要求在主表中删除记录的同时删除子表中的相关记录，则应将“删除”规则设置为________。

22、一个表文件中包含字段：姓名（C，6）、出生日期（D）和是否团员（L），则该表中每条记录所占的字节宽度为________。

23、如果一个表文件中有100条记录，当前记录号为76，执行命令SKIP -40后，再执行命令LIST NEXT 4后，当前记录号为________。

24、查询________更新表中的数据。

25、在SQL中，用________子句消除重复出现的元组。

26、在SQL中，用命令________可以从表中删除行，用________命令可以从数据库中删除数据表。 27、?AT(\，显示结果为______。 28、数据完整性通常包括__________________。

29、________是保证表中记录唯一的特点，即在一个表中不允许出现重复的记录。 30、在SQL查询时，WHERE子句的作用是________。

31、在关系数据库标准语言SQL中，实现数据查询的语句是________。 32、在表中，清除所有带删除标记的记录的命令是________。

33、使用命令DECLARE mm(2,3)定义的数组，包含的数组元素的个数为________。 34、在DO WHILE?ENDDO循环结构中,LOOP命令的作用是__________________。 35.Visual FoxPro有三种工作方式：________________。 36、程序文件的扩展名是_____________。

14

37、清除屏幕的命令是___________。

38、结构化程序有三种基本结构：________、________、________。 39、程序文件中，以“&&”开头语句是_________语句。

40、结构化程序设计包含3种基本控制结构，其中FOR－ENDFOR语句属于_________结构。 41、查询设计器的“筛选”选项卡用来指定查询的______。

42、在DO WHILE-ENDDO循环结构中，_________命令的作用是终止循环，将控制转移到本循环结构ENDDO后面的第一条语句继续执行。

43、自由表中字段名的最大长度是_________。

44、如果某个数值字段宽度为8，小数为2，则其整数部分最大取值为_________。

45、视图和查询都可以对_________表进行操作。视图可以_________ 修改源表中的数据。查询 更新源表中的数据。

46、用二维表来表示和实现实体之间联系的模型是_________。 47、在Visual FoxPro中，存储图像的字段类型应该是_________。 48、x>1或x<0的FoxPro表达式是______。

49、0≤X＜1的Visual FoxPro表达式是_________。

50、数据库管理系统的英文缩写是_________。SQL的中文意思是_________。 51. 2≤X≤6的Visual FoxPro表达式是_____________________________。 52. 查询设计器的“筛选”选项卡用来指定查询的______________。 53. 可以伴随着表的打开而自动打开的索引是_________________。

54. 如果一表文件中有10条记录，当前记录号为4，再执行命令skip -2后，当前记录号为________。 55. 视图_________（选填能或不能）更新表中的数据。 56. 数据库管理系统的英文缩写是_______________。

57. 用严格的日期格式写出2011年6月20日_______________________。

58. 在DO WHILE?ENDDO循环结构中,EXIT命令的作用是______________________。 59. 在表结构中，日期型数据的宽度为_________。 60. 在自由表中不设置的索引是________________。

二、判断题举例

1. 日期型数据的代号为D。 （ √ ） 2. 清除屏幕的命令是CLEAR。 （ √ ） 3. 程序文件的扩展名是.PRG。 （ √ ） 4. 2<4的值为 .T.。 （ √ ） 5. 数据完整性通常包括实体完整性、参照完整性和域完整性。 （ √ ） 6. 自由表中字段名的最大长度没有限制。 （ × ） 7. 数据表中的字段顺序可以任意交换。 （ √ ） 8. 视图不能更新表中的数据。 （ × ） 9. 在SQL查询时，用while子句表示查询条件。 （ × ） 10. 通过“工具”菜单中的“选项”命令，可以指定文件位置的默认目录 （ √ ）

参考答案：（若觉得答案有误，请及时咨询任课老师） 一、选择题

1-10 BABBB BACBA 11-20 BBABC CCBBA 21-30 AACBC CACDB 31-40 BCACB CDBAC 41-50 BABBC CDDAA 51-60 DACBA ABDDD 61-70 DDADC BDCBB 71-80 DADBC DBABD 81-90 CCCDC BBCAB 91-100 AAAAB CCABC 101-110 BBBDC ABCCC 111-120 CCCAC BBCAB 121-130 ABCCB BCBCC 131-140 ACDCB ABCCB 141-150 BCACB BBBDC 151-157 BBBBB C

157. 6,15 158. 1 159.1 160. 25 161. 55 162．（1）<>0或!=0或#0 (2) J=I+1 (3) STR(N) 163.(1) .NOT.EOF() (2)数量>10.and数量<=50 (3)SKIP

15