全国计算机二级FOX语言上机改错题题型
敬业的IT人
互联网
佚名
2008-1-4 20:25:20
第1题
ZHG.DBF是一个职工信息文件，其中包含编号(C 5)、姓名(C 8)、性别(C 2)、政治面目(C 4)、出生日期(D 8)等字段。性别用字符串"男"或"女"表示，政治面目用字符串"党员"、"团员"或"群众"表示。此文件已按政治面目建立了索引，索引文件名是ZHG_ZHZH.IDX。
程序MODI1.PRG功能是：显示输出所有政治面目为"群众"的女职工的姓名和出生日期（每行输出一个职工的信息）；程序中有两处错误，请加以改正。
MODI1.PRG
SET TALK OFF
*******************found********************
USE ZHG &&正确的是 USE ZHG INDEX ZHG_ZHZH
SEEK "群众"
*******************found********************
DO WHILE !EOF() &&正确的是 DO WHILE 政治面目="群众"
IF 性别="女"
? 姓名,出生日期
ENDIF
SKIP
ENDDO
USE
SET TALK
*******************found********************
DO WHILE .NOT.FOUND() &&正确的是DO WHILE FOUND()
IF 性别="女"
CONTINUE
*******************found********************
BREAK &&正确的是LOOP
ENDIF
? 姓名,班级
CONTINUE
ENDDO
USE
SET TALK
SELECT STUDENT
*******************found********************
SEEK 学号 &&正确的是 SEEK SCORE->学号
? 姓名 "："
SELECT SCORE
?? 成绩
SKIP
第5题
ZHG.DBF是一个职工信息文件，其中包含编号(C 5)、姓名(C 8)、性别(C 1)、基本工资(N 8.2)等字段；其中的性别用代码"M"表示男、"F"表示女，此文件已按基本工资建立了索引，索引文件名是ZHG_GZ.IDX。
程序MODI1.PRG功能是：按基本工资由高到低的顺序显示输出 所有职工的姓名、性别和基本工资，每行输出一个职工的信息，其中性别须输出汉字"男"或"女"。程序中有两处错误，请加以改正。
MODI1.PRG
SET TALK OFF
USE ZHG INDEX ZHG_GZ
*******************found********************
GO TOP &&正确的是：GO BOTTOM
DO WHILE .NOT.BOF()
? 姓名 " "
?? IIF(性别<>"M", "女","男")
?? " ",基本工资
*******************found********************
SKIP &&正确的是：SKIP -1
ENDDO
USE
SET TALK
GO BOTTOM
*******************found********************
DO WHILE !EOF() &&正确的是DO WHILE .NOT.BOF()
? 编号,姓名,出生日期
SKIP -1
ENDDO
USE
SET TALK
clear
@ 2,2 say "修改第几条记录?" get r range 1,rno
read
go r
**********************found************************
store to unchange &&参考答案：scatter to unchange
@ 4,10 say "学号" get unchange(1) picture "999999"
@ 6,10 say "姓名" get unchange(2)
@ 8,10 say "所属z系" get unchange(3)
**********************found************************
store to unchange &&参考答案：read
@ 10, 2 say "准备存入你修改过的记录吗?(Y/N) " get ans
read
if upper(ans)="Y"
**********************found*************************
append from to unchange &&参考答案：gather from unchange
endif
@ 12,2 say "继续吗?" get conti
read
if upper(conti)<>"Y"
exit
endif
enddo
set talk on
return
第10题
给定程序MODI1.PRG的功能是：根据银行流水帐，同时修改银行和个人帐目。P3DB1为银行数据库，包括：支行号，名称，现有资金三个字段。P3DB2是个人数据库，包括：帐号，姓名，密码，余额四个字段。P3DB3是银行流水帐数据库，包括：帐号，支行号，日期，金额，存取，其中“存取”字段为逻辑型数据，存入其值为真T，取出其值为假F。另外，假设所有银行的初始资金为800000元，所有个人的初始资金为20000元，修改调试如下程序，使之能正确运行。
改错要求：程序中共有三处错误，请修改*****found****下面的错误，并调试运行。
注意：要求在原来位置修改，不得增加或删减程序行。
set talk off
set safety off
sele 1
use p3db1
replace all 现有资金 with 800000
index on 支行号 to id1
sele 2
use p3db2
replace all 余额 with 20000
index on 帐号 to id2
sele 3
use p3db3
set relation to 支行号 into A
**************found****************
set relation &&参考答案：set relation to 帐号 into B ADDITIVE
go top
do while .not.eof()
**************found****************
if 存取=.t. &&参考答案：if 存取
sele 1
replace 现有资金 with 现有资金 c->金额
sele 2
replace 余额 with 余额 c->金额
Else
sele 1
replace 现有资金 with 现有资金- c->金额
sele 2
replace 余额 with 余额- c->金额
Endif
sele 3
**************found****************
loop &&参考答案：SKIP
Enddo
sele 1
List
Wait
sele 2
List
Wait
set talk on
return
ZHG.DBF是一个职工信息文件，其中包含编号(C 5)、姓名(C 8)、性别(C 2)、政治面目(C 4)、出生日期(D 8)等字段。性别用字符串"男"或"女"表示，政治面目用字符串"党员"、"团员"或"群众"表示。此文件已按政治面目建立了索引，索引文件名是ZHG_ZHZH.IDX。
程序MODI1.PRG功能是：显示输出所有政治面目为"群众"的女职工的姓名和出生日期（每行输出一个职工的信息）；程序中有两处错误，请加以改正。
MODI1.PRG
SET TALK OFF
*******************found********************
USE ZHG &&正确的是 USE ZHG INDEX ZHG_ZHZH
SEEK "群众"
*******************found********************
DO WHILE !EOF() &&正确的是 DO WHILE 政治面目="群众"
IF 性别="女"
? 姓名,出生日期
ENDIF
SKIP
ENDDO
USE
SET TALK
*******************found********************
DO WHILE .NOT.FOUND() &&正确的是DO WHILE FOUND()
IF 性别="女"
CONTINUE
*******************found********************
BREAK &&正确的是LOOP
ENDIF
? 姓名,班级
CONTINUE
ENDDO
USE
SET TALK
SELECT STUDENT
*******************found********************
SEEK 学号 &&正确的是 SEEK SCORE->学号
? 姓名 "："
SELECT SCORE
?? 成绩
SKIP
第5题
ZHG.DBF是一个职工信息文件，其中包含编号(C 5)、姓名(C 8)、性别(C 1)、基本工资(N 8.2)等字段；其中的性别用代码"M"表示男、"F"表示女，此文件已按基本工资建立了索引，索引文件名是ZHG_GZ.IDX。
程序MODI1.PRG功能是：按基本工资由高到低的顺序显示输出 所有职工的姓名、性别和基本工资，每行输出一个职工的信息，其中性别须输出汉字"男"或"女"。程序中有两处错误，请加以改正。
MODI1.PRG
SET TALK OFF
USE ZHG INDEX ZHG_GZ
*******************found********************
GO TOP &&正确的是：GO BOTTOM
DO WHILE .NOT.BOF()
? 姓名 " "
?? IIF(性别<>"M", "女","男")
?? " ",基本工资
*******************found********************
SKIP &&正确的是：SKIP -1
ENDDO
USE
SET TALK
GO BOTTOM
*******************found********************
DO WHILE !EOF() &&正确的是DO WHILE .NOT.BOF()
? 编号,姓名,出生日期
SKIP -1
ENDDO
USE
SET TALK
clear
@ 2,2 say "修改第几条记录?" get r range 1,rno
read
go r
**********************found************************
store to unchange &&参考答案：scatter to unchange
@ 4,10 say "学号" get unchange(1) picture "999999"
@ 6,10 say "姓名" get unchange(2)
@ 8,10 say "所属z系" get unchange(3)
**********************found************************
store to unchange &&参考答案：read
@ 10, 2 say "准备存入你修改过的记录吗?(Y/N) " get ans
read
if upper(ans)="Y"
**********************found*************************
append from to unchange &&参考答案：gather from unchange
endif
@ 12,2 say "继续吗?" get conti
read
if upper(conti)<>"Y"
exit
endif
enddo
set talk on
return
第10题
给定程序MODI1.PRG的功能是：根据银行流水帐，同时修改银行和个人帐目。P3DB1为银行数据库，包括：支行号，名称，现有资金三个字段。P3DB2是个人数据库，包括：帐号，姓名，密码，余额四个字段。P3DB3是银行流水帐数据库，包括：帐号，支行号，日期，金额，存取，其中“存取”字段为逻辑型数据，存入其值为真T，取出其值为假F。另外，假设所有银行的初始资金为800000元，所有个人的初始资金为20000元，修改调试如下程序，使之能正确运行。
改错要求：程序中共有三处错误，请修改*****found****下面的错误，并调试运行。
注意：要求在原来位置修改，不得增加或删减程序行。
set talk off
set safety off
sele 1
use p3db1
replace all 现有资金 with 800000
index on 支行号 to id1
sele 2
use p3db2
replace all 余额 with 20000
index on 帐号 to id2
sele 3
use p3db3
set relation to 支行号 into A
**************found****************
set relation &&参考答案：set relation to 帐号 into B ADDITIVE
go top
do while .not.eof()
**************found****************
if 存取=.t. &&参考答案：if 存取
sele 1
replace 现有资金 with 现有资金 c->金额
sele 2
replace 余额 with 余额 c->金额
Else
sele 1
replace 现有资金 with 现有资金- c->金额
sele 2
replace 余额 with 余额- c->金额
Endif
sele 3
**************found****************
loop &&参考答案：SKIP
Enddo
sele 1
List
Wait
sele 2
List
Wait
set talk on
return
- 最新文章
- 全国计算机等级考试四级上机编程题型[01-04]
- 1997年全国计算机等级考试四级试题[01-04]
- 2002年9月全国三级数据库技术试卷（含答案）[01-04]
- 微软认证系列[01-04]
- 揭开微软.NET认证考试的面纱[01-04]
- 微软认证操作系统技术支持工程师（MCDST）介绍[01-04]
- 相关文章
- 全国计算机等级考试四级上机编程题型[01-04]
- 1997年全国计算机等级考试四级试题[01-04]
- 防病毒必务宝典—计算机病毒专杀进程列表[01-04]
- 防御计算机病毒十大必知步骤[01-04]
- 使用Honeypots同计算机蠕虫病毒作斗争[01-04]
- 小程序显示谁连接到你的计算机[01-04]
