大学计算机VFP程序设计期末考试复习题.doc

1、 第 1 页 共 14 页 2008-06-13 大学计算机大学计算机 VFPVFP 程序设计期末考试复习题程序设计期末考试复习题 一、一、单项选择题单项选择题 1.在有关数据库的概念中，若干记录的集合称为( )。 A.文件 B.字段 C.数据项 D.表 标准答案 D 2.要计算职称为副教授或教授的工资总额,下列命令中错误的是( )。 A.工资 FOR 职称=“副教授“.OR.职称=“教授“ B.SUM ALL 工资 FOR 职称=“副教授“.OR.职称=“教授“ C.SUM 工资 FOR “教授“$职称 D.SUM 工资 FOR 职称=“副教授“.AND.职称=“教授“ 标准答案 D 3.不

2、允许记录中出现重复索引值的索引是( )。 A.主索引 B.主索引、候选索引、普遍索引 C 主索引和候选索引 D 主索引、候选索引和唯一索引 标准答案 B 4.在 Visual FoxPro 中，打开数据库的命令是( )。 A.OPEN DATABASE B.USE C.USE DATABASE D.OPEN 标准答案 A 5. 连 续 执 行 以 下 命 令 之 后 ， 最 后 一 条 命 令 的 输 出 结 果 是 ( ) 。 SET EXACT OFF X=“A “ ?IIF(“A“=X,X-“BCD“,X+“BCD“) A.A B.BCD C.A BC D.ABCD 标准答案 C 6.在

3、以下四组函数运算中，结果相同的是( )。 A.LEET(“Visual FoxPro“,6)与 SUBSTR(“Visual FoxPro“,1,6) B.YEAR(DATE()与 SUBSTR(DTOC(DATE(),7,2) C.VARTYPE(“36-5*4“)与 VARTYPE(36-5*4) D.假定 A=“this“, B=“ is a string“, A-B 与 A+B 标准答案 A 7.在 Visual Foxpro 中，用于建立或修改过程文件的命令是 ( )。 A.MODIFY B.MODIFY COMMAND C.MODIFY PROCEDURE D.上面 B)和 C)都

4、对 标准答案 B 8.使用命令 DECLARE mm(2,3)定义的数组，包含的数组元素(下标变量)的个数为 ( )。 A.2 B.3 C.5 D.6 标准答案D 9.APPEND 命令的功能是( )。 A.在表的最前面插入一条记录 B.在表的最后面插入一条记录 C.在表的最前面任意位置插入一条记录 D.删除一条记录 标准答案 B 10.打开学生数据库及(对成绩字段的)索引文件，假定当前记录号为 200，欲使记录指针指向记录号为 100 的 记录，应使用命令( )。 A.LOCATE FOR 记录序号=100 B.SKIP 100 C.GOTO 100 D.SKIP -100 标准答案C 11

5、.使用 TOTAL 命令生成的分类汇总库文件的扩展名是( )。 A.DBT B.DBF C.DBC D.CDX 标准答案 C 第 2 页 共 14 页 2008-06-13 12.执行命令序列： STORE CTOD(“05/06/98”)TO MDATE ?MDATE 后，屏幕上显示值是( )。 A.05/09/98 B.MDATE C.05/06/98 D.CTOD 标准答案 C 13.假定系统是期是 2004 年 01 月 05 日，有如下命令： NJ=YEAR(DATE() 执行该命令后，NJ 的值是( )。 A.2004 B.01 C.05 D.01/05/04 标准答案 A 14.

6、有以下命令序列： USE STUDENT LIST record# 姓名 出生日期 1 欧阳惠 07/12/69 2 李明 02/24/70 3 杨霞 11/05/71 INDEX ON 出生日期 TO BD LIST 执行该命令序列后，显示记录号的顺序是( )。 A1 2 3 B3 2 1 C2 1 3 D1 3 2 标准答案 A 15.学生数据库文件中共10 条记录， 其姓名字段值均为学生全名， 执行如下命令序列： USE STUDENT ?recno() 最后，recno()函数的显示值是( )。 A.1 B.0 C.10 D.2 标准答案 A. 16.比较表达式的结果是( )。 A.字

7、符型 B.逻辑型 C.数值型 D.日期型 标准答案 B 17.用 COPY STRU TO 形成的文件是( )。 A.表文件 B.索引文件 C 文本文件 D.正式文件 标准答案 A 18.不能作为索引关键字的数据类型是（ ） 。 A.数值型 B.备注型 C. 日期型 D.字符型 标准答案 B 19.显示数据表当前记录内容的命令是( )。 A.LIST NEXT 1 B.DISPLAY ALL C.TYPE D. DISP REST 标准答案 D 20.用命令 DIMENSION A(4，5)定义后，A 数组中共有( )个数据元素。 A.4 B.5 C.9 D.20 标准答案 D 21.执行 U

8、SE 命令的作用是 ( )。 A.关闭所有工作区的数据表文件 B 关闭当前工作区的数据表文件 C.关闭所有文件 D.对数据表文件没有影响 标准答案 B 22.函数 EOF()用于检测当前数据库记录指针是否达到( )。 A.文件头 B.文件尾 C.指定记录 D.第一条记录 标准答案 A 23. 建立表文件用( ) 命令。 A.MODI COMM B.EDIT C.CREATE D.MODI STRU 标准答案 C 24.INSERT 命令将一条新记录加到( )。 A.当前记录之前 B.当前记录之后 C.文件末尾 D.文件顶部 标准答案 B 25.下述命令中不能关闭数据表的命令是( )。 A.US

9、E B.CLOSE DATABASE C.CLEAR D.CLOSE ALL 标准答案 C 26.以下表达式的结果为数值型的是( )。 A.“牛“$ “牛群“ B.“wish you“wish you success“ C.98/6/14+15 D.1994-08-06-1992-08-11 标准答案D 27.用菜单方式打开一个数据表文件应该使用的菜单序列为( )。 A.文件打开表 B.文件打开表格 C.文件新建数据表 D.数据表 打开 标准答案C 28.清除主窗口屏幕的命令是( )。 A.CLEAR B.CLEAR ALL C.CLEAR SCREEN D.CLEAR WINDOWS 标准答

10、案 A 29.对于只有两种取值的字段，一般使用的数据类型是( )。 A.字符型 B.数值型 C.日期型 D.逻辑型 标准答案 D 30.在下面的 Visual FoxPro 表达式中，不正确的是 ( )。 A.2008-05-01 10:10:10 AM-10 B.2008-05-01-DATE() C.2008-05-01+DATE() D2008-05-01+1000 标准答案 C 第 3 页 共 14 页 2008-06-13 31.下面( )不是 VFP 程序文件中可以使用的注释语句。 A.NOTE B.* C./ D.& 标准答案 C 32.Visual FoxPro 6.0 中，命

11、令?VARTYPE(“12/31/99“)的输出结果是( )。 A.D B.N C.C D.U 标准答案 C 33.下列各字符组合中( )不是 VFP 中的字符常量。 A.计算机应用 B.2008 C.“ABCDE“ D.101.867 标准答案 A 34 下列不能关闭数据表的是( )。 A.browse B.clear all C.close all D.close database 标准答案 B 35.执行以下命令后显示的结果是( )。 N=356.54 ?87+&N A.87+&N B.87356.54 C.443.54 D.出错信息 标准答案 C 36.下列表达式中， ( )表达式的值

12、是数值。 A.ABC+D B.2008/05/17-2008/04/09 C“123“+“456“ D.2003/05/18+15 标准答案 B 37.逻辑型字段“团员“其值为真的正确条件表达是( )。 A.FOR 团员=T B.FOR 团员=“.T.“ C.FOR 团员 D.FOR 团员=“.Y.“ 标准答案 C 38.函数 LEN(TRIM(SPACE(8)-SPACE(8)返回的值是( )。 A.8 B.16 C.0 标准答案 B 45.下面( )不属于 VFP 的循环控制语句。 A.DO WHILE ENDDO B.FOR ENDFOR C.SCANENDSCAN D.DO CASEE

13、NDCASE 标准答案 D 46.有一个表文件 GZ.DBF，已经打开。其中有字段名“基本工资” 、 “实发工资” 。下面按“实发工资”进行 索引的操作不正确的是( )。 A.INDEX ON 实发工资 TO SFGZ B.INDEX ON 实发工资 TAG 实发工资 C.INDEX ON 实发工资 TAG 实发工资 OF GZ.CDX D.INDEX ON 基本工资TO JBGZ 标准答案B 47.SEEK 和 FIND 命令是作用于( ) 的快速检索命令。 A.表文件 B.命令文件 C.索引文件 D.排序文件 标准答案 C 48.表文件 KD.DBF 打开后，执行命令 SKIP -1，下列

14、命令中结果为.t.的是( )。 第 4 页 共 14 页 2008-06-13 A.?RECNO() B.?BOF() C.?EOF() D.DISP 标准答案 B 49.下面程序运行结果是( )。 A.rest B.all C.skip D.next 2 标准答案 C 50.要为当前表所有职工增加 100 元工资应该使用命令（ ） 。 A.CHANGE 工资 WITH 工资+100 B.REPLACE 工资 WITH 工资+100 C.CHANGE ALL 工资 WITH 工资+100 D.REPLACE ALL 工资 WITH 工资+100 标准答案 D 52.如果一个字段的宽度为 8，则

15、此字段的类型不可能是（） A.数值型 B.字符型 C.日期型 D.备注型 标准答案 D 53.函数 EOF()用于检测当前数据库记录指针是否达到( )。 A.文件头 B.文件尾 C.指定记录 D.对数据表文件无作用 标准答案 B 54.在 VFP 中，通用型字段 G 和备注型字段 M 在表中的宽度都是( )。 A.2个字节 B.4个字节 C.8个字节 D.10个字节 标准答案B 55.执行命令 DIMENSION M(4,2)之后，数组的下标变量个数和初值分别是( )。 A.8,.F. B.4,.T. C.8,O D.2,空值 标准答案 A 56.在当前表中，查找第 2 个女同学的记录，应使用

16、命令是( )。 A.LOCATE FOR 性别=“女“ NEXT2 B.LOCATE FOR 性别=“女“ C.LOCATE FOR 性别=“女“和 CONTINUE D.LIST ROR 性别=“女“ NEXT 2 标准答案 C 57.建立表文件结构时，需要定义的参数为( )。 A.表文件名、表的大小、字段名、字段类型 B.字段名、字段类型、记录个数、字段宽度 C.字段名、字段类型、字段宽度、小数位数 D.表文件名、字段名、字段类型、字段宽度 标准答案 C 58.ABC.DBF 是一个有两个备注型字段的表文件，使用 COPY TO PSQ 命令进行复制操作，其结果将( ) A.得到一个新的数

17、据库文件 B.得到一个新的数据库文件和一个新的备注文件 C.得到一个新的数据库文件和两个新的备注文件 D.显示出错误信息，表明不能复制具有备注型字段的数据 标准答案 B 59.表文件的数值型字段要求保留 2 位小数，那么该字段宽度最少应当定义成( )位。 A.2 B.3 C.4 D.5 标准答案 C 60.下列命令不能关闭数据表文件的是( )。 A.browse B.use C.close all D.close database 标准答案 A 61.要在当前表文件的当前记录之后插入一条新记录，应该使用命令是( )。 A.APPEND B.EDIT C.CHANGE D.INSERT 标准答案

18、 D 62.DELETE 命令的功能是( )。 A.为当前记录做删除标记 B.直接物理删除当前记录 C.删除当前数据库文件的所有记录 D.在提问确认后物理删除当前记录 标准答案 A 63.建立数据表文件用( ) 命令。 A.MODI COMM B.EDIT C.CREATE D.MODI STRU 标准答案 C 64.下列不能作为查询的命令是( )。 A.locate B.index C.seek D.find 标准答案 B 65.在建立表结构(modi stru)过程中不须要输入字段宽度的字段类型是( )。 A.字符型 B.数值型 C.备注型 标准答案 C 66.在以下关于索引的说明中，错误

19、的是( )。 A.索引可以提高查询速度 B.索引可能降低更新速度 C.索引和排序具有不同的含义 D.索引文件比排序文件小 标准答案 B 67.统计当前工作区记录数的函数是( ) A.RECNO( ) B.RECCOUNT( ) C.FCOUNT( ) D.FOUND( ) 标准答案 B 68.已知 P=DATE(),则 P 为( )型内存变量。 第 5 页 共 14 页 2008-06-13 A.字符 B.日期 C.逻辑 D.数值 标准答案 B 69.在下列 VFoxPro 的表达式中，结果为.T.的是( )。 A.112=“90“ B.张先生=李先生 C.90/09/09-8 41.INPU

20、T 命令输入的数据可以是常量、变量，也可以是一般的表达式，但不能不输入任何内容直接按回车。 1 三、三、程序改错题程序改错题 1.下面的程序是求 3+9+27+81+243+.这样的数之和. 若累加数大于 500 时,则结束累加.程序中有一处错 误。 改正后运行程序，将程序执行结果填入答案框内。 SET TALK OFF CLEAR X=3 Y=0 DO WHILE .F. Y=Y+X IF Y500 EXIT ENDIF STORE 3*X TO X ENDDO ?Y SET TALK ON RETURN 1092 2.已知 S1=1,S2=1+2,S3=1+2+3,SN=1+2+N,下面的

21、程序求 S20 到 S80 有多少数能被 17 或 35 整除。 改正后运行程序，将程序执行结果填入答案框内。 SET TALK OFF I=20 N=0 DO WHILE I=25 中止。程序中有错误。改正后运行程序，将程序执行结果填 入答案框内。 SET TALK OFF CLEAR s=0 k=1 DO WHILE .T. s=s*k IF k=25 EXIT ENDIF k=k+4 ENDDO ?s RETURN 5221125 4.下面的程序是求 1 到 500 的偶数立方和与奇数立方和之差。程序中有一处错。更正程序中的错误,运行更 正后的程序,记录运行结果, 将结果填入答题窗口内。

22、 SET TALK OFF STORE 0 TO I,S1,S2 DO WHILE Isqrt(i) s=s+1 endif endf ?s set talk on return 14.编写程序，求 600 到 900 之间素数的个数。 45 set talk off clear s=0 for i=600 to 900 for j=2 to sqrt(i) if mod(i,j)=0 exit endif endf if jsqrt(i) s=s+1 endif endf ?s set talk on retu 15.编写程序，求 600 到 900 之间素数的和。 33501 set ta

23、lk off clear s=0 for i=600 to 900 for j=2 to sqrt(i) if mod(i,j)=0 exit endif endf if jsqrt(i) s=s+i endif endf ?s set talk on retu 16.编写程序，求 200 到 800 之间素数的和。45851 第 12 页 共 14 页 2008-06-13 set talk off clear s=0 for i=200 to 800 for j=2 to sqrt(i) if mod(i,j)=0 exit endif endf if jsqrt(i) s=s+i end

24、if endf ?s set talk on retu 17.计算 S=3!+5!+7!+.+N!，求直到 S=680000 为止的奇数 N。 11 set talk off clear s=0 for n=3 to 1000 step 2 sub=1 for j=3 to n sub=sub*j endf s=s+sub if s=680000 exit endif endf ?n set talk on retu 18.1!+2!+3!+n! 当 s 大于 61000 时结束累加，求 n。 9 set talk off clear s=0 for n=1 to 1000 step 1 su

25、b=1 for j=1 to n sub=sub*j endf s=s+sub if s61000 exit 第 13 页 共 14 页 2008-06-13 endif endf ?n set talk on return 19.下列的程序是求 S=8!+9!+10!的程序.在下列程序中填上缺少的语句或 另外编写程序，(程序名由考生自 定）运行程序，将结果填入答题窗口。 SET TALK OFF CLEAR S=0 I=8 DO WHILE I输出10,100中除以 17 的余数和除以 5 的商相等的整数的个数。 SET TALK OFF N=0 FOR K=10 TO 100 IF _ ?

26、 K N=N+1 ENDIF ENDFOR ? N RETURN 4 22.输出10,100中除以 15 的余数和除以 4 的商相等的整数的个数。 SET TALK OFF N=0 FOR K=10 TO 100 IF _ ? K N=N+1 ENDIF ENDFOR ? N RETURN 5 23.统计区间1000，9999内所有能被 3 整除，且千位数字与个位数字之和为 8 的整数的个数。 Set talk off t=0 I=1000 do while I500 EXIT ENDIF ENDIF NEXT ?“S=“,S RETURN 550 27.编程求 S=1*3+2*4+3*5+.

27、+198*200。在下列程序中填上缺少的语句或另外编写程序，运行程序，将结果填 入答题窗口。 SET TALK OFF S=0 N=1 DO WHILE N3000 止，求此时数列中最大的元素值。(程序名由考生自定)。在下列程序中填上缺少的 第 14 页 共 14 页 2008-06-13 语句或另外编写程序，运行程序，将结果填入答题窗口。 SET TALK OFF CLEAR s=0 p=0 i=1 DO WHILE .t. p=p+i S=S+P IF s3000 _ ENDIF i=i+1 enddo ? p RETURN 351 31.求出100，500以内同时满足除以 7 余 1，除

28、以 5 余 3,除以 3 余 1 的所有整数的个数。(程序名由考生自定)。 在下列程序中填上缺少的语句或另外编写程序， 运行程序， 将结果填入答题窗口。 Set talk off clear n=0 sum=0 for I=100 to 500 if _ n=n+1 endif endfor ? N set talk on return 4 32.求200，600间奇数之和。(程序名由考生自定)。在下列程序中填上缺少的语句或另外编写程序，运行程序， 将结果填入答题窗口。 Set talk off s=0 for I=200 to 600 if _ loop endif s=s+I endfor

29、 ? S return 80000 33.编程求区间5000，9999中所有素数的个数.(程序名由考生自定)。在下列程序中填上缺少的语句或另外编写程 序，运行程序，将结果填入答题窗口. Set talk off I=9999 t=0 do while I=5000 j=2 do while j=5000 j=2 do while j=I-1 if _ exit endif j=j+1 enddo if j=I t=t+1 endif i=i-1 enddo ?t 560 35.求在四位数的奇数中，所有各位数字之和是 25 的倍数的数的和。 CLEAR S=0 FOR I=1001 TO 9999 STEP 2 A=INT(I/1000) B=INT(I/100)%10 C=INT(I/10)%10 D=I%10 IF _ S=S+I ENDIF NEXT ?“S=“,S RETURN 1298515