2010年4月重庆市计算机二级VF真题及答案Visual_FoxPro笔试试题及(2)

200

2．数据表（JIEJYE.dbf）内容如下： Record# 1 2 3 4 5

借书证号 0058 0179 0280 0010 0503

书名 计算机基础 操作系统 汇编语言 计算机组成

出版社 高等教育 重庆大学 人民教育 高等教育

微型计算机原理 电子工业

写出执行以下程序结果： Set exact off Use jieyue Do while .t.

If AT("计算机",书名)=0 exit endif

if 出版社="高等教育"

disp 借书证号,书名,出版社 endif skip Record# enddo 1

use

3．写出下列程序的运行结果 clea DIME A(6,6) A=0 A(1,2)=1 FOR i=2 to 6 for j=i to 2 step -1 a(i,j)=a(i-1,j)+a(i-1,j-1) ??a(i,j) endfor ? endfor

4．有如下程序，请写出运行结果：借书证号0058

书名 计算机基础

1 1 1 1 2 1 1 3 3 1 1 4 6 4 1

出版社 高等教育

clea all PUBLIC X,Y x=10 y=100 do pro1 ?x,y return

procedure pro1 private x x=5 local y do pro2 ?x,y return

procedure pro2 x=x+10 y=y-10 return

五、程序设计题（每小题10分，共20分）

1．有一个级数如下所示： 1，1，2，3，5，8，12，21……

其第一、二项为1，从第三项起，每项是前两项的和。编写一程序显示这个级数的前30项，按每行4项输出。计算最后两项的比值。 以下两种均可以： 或

15 .f. 10

90

2．在某公司的销售管理系统中，有两个数据表：销售人员档案表XSDA.dbf（编号（主键）C 4，姓名 C，8，性别 L，生日 D）和销售业绩表YJ.dbf（编号（有重复值）C 4，商品号C 10，客户 C 20，销售额Y，日期 D）。

要求编写一程序实现以下功能：反复输入销售人员编号（输入回车键退出），查询该销售人员的姓名以及销售业绩明细情况，统计其销售总额。 CLEAR SELE 1 USE XSDA

INDEX ON 编号 TAG BH SELE 2 USE JY

SET RELATION TO 编号 INTO XSDA DO WHILE .T. ACCEPT “请输入销售人员的编号：” TO BH IF LEN(ALLTRIM(BH))=0 EXIT ENDIF GO TOP S=0 SCAN FOR 编号=BH S=S+销售额 ？XSDA.姓名，商品号，客户，销售额，日期 ENDSCAN ?”销售总额：”，S ENDDO

CLOSE ALL