1、浙江计算机二级 VF模拟试卷 9及答案与解析 一、程序阅读选择题 阅读下列程序说明并回答问题，在每小题提供的若干可选答案中，挑选一个正确答案。 0 【程序说明】 下面为显示 SJK.DBF中 1989年 6月 8日出生的第一个学生记录的程序，其中，出生年月字段为 CS，索引文件为 INDS.IDX。 【程序】 SET TALK OFF USE SJK (1) (2) IF (3) DISPLAY ELSE ?“没有符合条件的记录 ” ENDIF USE (4) RETURN （ A） INDEX ON INDS OF SJK （ B） INDEX ON INDS TO SJK （ C） IND
2、EX ON CS TO INDS （ D） INDEX ON CS OF INDS （ A） SEEK CTOD(“89/06/08“) （ B） SEEK(“89/06/08“) （ C） SEEK DTOC(“89/0S/08“) （ D） SEEK YEAR(“89/06/08“) （ A） .T. （ B） FOUND() （ C） .F. （ D） FCOUND() （ A） TURN TALK OFF （ B） TURN TALK ON （ C） TURN ON （ D） SET TALK ON 4 【程序说明】 程序功能是求 1到 100之间的所有素数。 【程序】 SET TAL
3、K OFF CLEAR J=2 DO WHILE J 100 I 2 DO WHILE (5) IF MOD(J， I) 0 (6) ENDIF I I+1 ENDDO IF (7) ?J ENDIF J=J+1 (8) SET TALK ON RETURN （ A） I J （ B） I J （ C） I J （ D） I J （ A） EXIT （ B） END （ C） ENDDO （ D） ENDWHILE （ A） I INT(J/2) （ B） I INT(J/2) （ C） I=INT(J/2) （ D） I J/2 （ A） EXIT （ B） END （ C） ENDDO （
4、 D） ENDWHILE 8 【程序说明】 设成绩库 CJK.DBF中， “数学 ”(数值型字段 )这门课程的学分为 4，其学分算的方法如下： 数学 =90，学分值为 4 80数学 90，学分值为 3 70 =数学 80，学分值为 2 60数学 70，学分值为 1 数学 60，学分值为 0 计算任一学生数学这门课程的学分值。 【程序】 SET TALK OFF USE CJK ACCEPT“输入学号： ”TO XH XF 0 (9) DO CASE CASE (10) XH=4 CASE (11) XH 3 CASE (12) XF=2 CASE 数学 =60 XF 1 OTHERWISE X
5、F 0 ENDCASE ?“学号 :”， XH ?“数学的学分值 :”， XF USE RETURN （ A） LOCATE FOR 学号 =XH （ B） SEEK FOR 学号 =XH （ C） FIND FOR学号 =XH （ D） CONTINUE （ A）数学 90 （ B）数学 =80 （ C）数学 =70 （ D）数学 60 （ A）数学 90 （ B）数学 80 （ C）数学 90 （ D）数学 =60 （ A）数学 =90 （ B）数学 80 （ C）数学 70 （ D）数学 =60 12 【程序说明】 本试题用到学生数据库文件 (学生 .DBF)： 结构：学号 姓名 性别
6、出生年月 简历 奖学金 照片 C， 6 C， 8 L， 1 D， 8 M， 4 N， 6， 2 G， 4 记录； 记录号 # 学号 姓名 性别 出生年月 简历 奖学金 照片 1 971001 王平 .F. 05/06/89 memo 50.00 gen 2 971003 李华 .F. 01/23/90 memo 25.00 gen 3 974006 张小强 .T. 07/21/89 memo 0.00 gen 4 973008 赵峰 .T. 11/05/88 memo 75.00 gen 5 974011 丁超 .T. 09/27/91 memo 0.00 gen 6 973013 罗浩 .T
7、. 09/09/90 memo 50.00 gen (注：性别 .F.为女，性别 =.T.为男，学号前三位为班级号 ) 【程序】 USE 学生 ? RECNO()， BOF() &.第一个显示 LIST ? RECNO()， EOF() & 第二个显示 GO TOP ? RECNO()， EOF() & 第三个显示 SKIP1 ? RECNO()， BOF & 第四个显示 SKIP 22 ? RECNO()， BOF() & 第五个显示 13 第一个显示 ? RECNO()， BOF()的值为 _。 （ A） 1.T. （ B） 1.T. （ C） 7.F. （ D） 1.F. 14 第二个显
8、示 ? RECNO()， EOF()的值为 _。 （ A） 1.T. （ B） 7.T. （ C） 7.F. （ D） 1.F. 15 第三个显示 ? RECNO()， BOF()的值为 _。 （ A） 1.T. （ B） 7.T. （ C） 7.F. （ D） 1.F. 16 第四个显示 ? RECNO()， BOF()的值为 _。 （ A） 1.T. （ B） 7.T. （ C） 7.F. （ D） 1.F. 17 第五个显示 ? RECNO()， BOF()的值为 _。 （ A） 1.T. （ B） 7.T. （ C） 7.F. （ D） 1.F. 18 A的输出结果为 _。 （ A）
9、5 （ B） 6 （ C） 7 （ D） 8 19 B的输出结果为 _。 （ A） 5 （ B） 10 （ C） 12 （ D） 15 20 若将 DO WHILE.T.改为 DO WHILE.F.时， A的输出结果为 _。 （ A） 0 （ B） 7 （ C） 6 （ D） 15 21 若将 DO WHIE.T. 改为 DO WHILE. F.时， B的输出结果为 _。 （ A） 0 （ B） 7 （ C） 6 （ D） 15 21 【程序】 * 主程序 SET TALK OFF CLEAR STORE 100 TO X， Y， Z SET PROCEDURE TO GC1 DO PROCl
10、 WITH X， Y ? X， Y， Z SET PR()CEDURE TO SET TALK ON RETURN * 过程 PROCEDURE PROC1 PARAMETER M， N M=M+100 N N+100 RETURN 22 X的输出结果为 _。 （ A） 100 （ B） 200 （ C） 300 （ D） 400 23 Y的输出结果为 _。 （ A） 100 （ B） 200 （ C） 300 （ D） 400 24 Z的输出结果为 _。 （ A） 100 （ B） 200 （ C） 300 （ D） 400 二、编写程序题 25 编写程序，求从键盘输入的 N个数据的总和。
11、26 编写程序，显示 “学生 ”表中的全部字段名。 浙 江计算机二级 VF模拟试卷 9答案与解析 一、程序阅读选择题 阅读下列程序说明并回答问题，在每小题提供的若干可选答案中，挑选一个正确答案。 1 【正确答案】 C 【试题解析】 本程序是根据某出生日期查找记录，因此索引的字段应该是有关出生年月日的字段，在该库文件中是 CS字段。建立单项索引文件的格式； INDEX ON索引表达式 TO文件名 U NIQUECOMPACTADDITIVE 2 【正确答案】 A 【试题解析】 SEEK后的查找内容应是索引字段的值，也就是指定的 “1989年 6月 8日 ”，用语句应表示为 CTOD(“89/06
12、/08”)。 CTODO函数功能是将字符串转换成日期。 DTOC()函数功能是将日期转换成字符中。 YEAR()函数返回年份。 3 【正确答案】 B 【试题解析】 程序中 IF语句后是显示记录内容命令 DISPLAY，因此 IF后的条件应该是表示是否查找到，用 FOUND()。 FCOUNT()函数功能是返回指定工作区中所打开表的字段数。 4 【正确答案】 D 【试题解析】 首句 SET TALK OFF是关闭对话显示。 SET TALK ON是恢复对话显 示。 5 【正确答案】 D 6 【正确答案】 A 7 【正确答案】 B 【试题解析】 素数是只能被自己和 1整除的数。该程序的指导思想是：
13、变量 J从2增加到 100(1既不是素数也不是合数，所以直接从 2开始 )，是外层循环所做的工作，变量 J每增加 1，在循环体中判断本次循环的 J是否是素数，然后加 1。如何去判断 1是否是素数 ?如果 J最先遇到的能整除的数 (除了 1以外 )比 J的一半还大，这个能整除的数肯定是 J自己，那么此时的 J是素数。在内循环，被除数 I，最大也不能超过 J，所以第 (5)空是 I =J。在循环体内 ，如果找到第一个能够整除J的 I，此时要退出内循环，其余的 I不用再参与循环了。剩下的工作就只需要判断 I是比 J的一半大，还是比 J的一半小。如果大，则 J是素数，如果小，则 J不是素数。综上分析，
14、第 (6)个空和第 (7)个空分别填 EXIT和 I INT(J/2)。 8 【正确答案】 C 【试题解析】 在 Visual FoxPro中有 3种循环语句； DO WHILE ENDDO ，SCAN ENDSCAN 和 FOR ENDFOR 。 9 【正确答案】 A 【试题解析】 顺序查找命令的格式： LOCATE FOR条件 WHILE条件范围 。功能；按表的排列顺序依次搜索满足条件的第一条记录。 10 【正确答案】 A 11 【正确答案】 B 12 【正确答案】 C 【试题解析】 第 (10)、 (11)和 (12)题是考核 DO CASE分支语句。再结合题意，能很容易得出此三小题的答
15、案。 13 【正确答案】 D 【试题解析】 RECNO()返回工作区中当前的记录号。 BOF()表头测试函数的格式： BOF(工作区号 /别名 )。功能当记录指针指向表文件的首记录之前(表头 )时， 该函数值为 .T.，否则返回 .F.。输出值类型为逻辑型。 工作区号 /别名 )用于指定工作区，缺省为当前工作区。 EOF()表尾测试函数的格式；EOF(工作区号 /别名 )。功能：当记录指针指向表文件的末记录之后 (表尾 )时，该函数值为 .T.，否则返回 .F.。输出值类型为逻辑值。 工作区号 /别名 用于指定工作区，缺省为当前工作区 14 【正确答案】 B 【试题解析】 做完了 LIST命令
16、后指针移到了文件尾。若记录指针移到文件尾，则 RECNO()=记录数 +1且 EOF ()=.T.。 15 【正确答案】 D 【试题解析】 指针移到首记录，即指向第一条记录。 16 【正确答案】 A 【试题解析】 当指针指向第一条记录时，再执行 SKIP-1命令，此时，记录号仍为首记录号。且 BOF为 .T.。 17 【正确答案】 B 【试题解析】 当指针移到文件尾后不再下移。 18 【正确答案】 C 19 【正确答案】 C 【试题解析】 本程序执行时，当 A=6时，既满足第一个条件 “被 3整除 ”，也满足第二个条件 “大于等于 6”，但此时应执行第一个 CASE语句中的 LOOP语句。当
17、A 7时，才退出循环， B的值等于不满足前两个条件的 A的总和，即等于1+2+4+5=12。 20 【正确答案】 A 21 【正确答案】 A 【试题解析】 当 DOWHILE.F.时，循环条件值为假，则不执行循环体。直接输A、 B值，它们的值为初值 0。 22 【正确答案】 B 23 【正确答案】 B 24 【正确答案】 A 【试题解析】 程序运行的开始， X、 Y、 Z的值均为 100，当主程序调用 PROC1过程时，将 X的值 100传递给过程中的 M，将 Y的值 100传递给过程中的 N。接着执行子过程中的语句，处理结果 M值为 200， N的值为 200。在过程执行结束返回主程序时，将
18、 M的值 200反传给主程序中的 X，将 N的值 200反传给主程序中的 Y。因此主程序中 X的结果是 200， Y的结果也是 260，而 Z值没有变，仍然是原值 100。 二、编写程序题 25 【正确答案】 程序代码如下： SET TALK OFF CLEAR INPUT “N “ TO N S=0 FOR I 1 TO N INPUT “A=“ TO A S=S+A ENDFOR ? “S=“， S SET TALK ON 26 【正确答案】 程序代码如下： SET TALK OFF CLEAR USE 学生 FOR N=1 TO FCOUNT() ? FIELD(N) ENDFOR USE SET TALK ON
