2008 年秋浙江省高等
计算机等级考试试卷(二级 计算机等级考试试卷 二级 Foxpro)
说明:⑴考生应将所有试题的答案填写在答卷上.其中试题 1 到试题 6 请在答卷上的各小 题选项的对应位置上填"√" . ⑵请将你的准考证号的后五位填写在答卷右下角的指定位置内. ⑶考试时间为 90 分钟. ⑷本
试卷中涉及到的相关表文件,其结构和记录如下所示: 1, 学生 , 学生.DBF 结构: C,6 记录: 记录号# 学金 1 2 3 4 5 6 照片 951001 951003 954006 953008 954011 953013 王平 李华 张小强 .T. 赵峰 丁超 罗浩 .T. .F. .F. .T. .T. 05/06/70 01/23/71 11/05/72 09/27/70 memo memo memo memo 50.00 gen 25.00 gen 0.00 gen gen 75.00 gen 0.00 50.00 gen 性别 出生年月 简历 奖 C,8 性别 L,1 出生年月 D,8 简历 M,4 奖学金 N,6,2 照片 G,4
07/21/70
memo
09/09/71
memo
(注:性别=.F.为女,性别=.T.为男,前三位为班级号) 2, 课程 , 课程.DBF 结构:课程号 C,4 记录: 记录号# 1 2 3 4 5 课程号 0001 0002 0003 0004 0005
课程名 高等数学 英语
计算机基础 数据库应用 工程制图 68 80 80 学时数 108 90
课程名 C,20
学时数 N,3
3,成绩.DBF ,成绩 结构: C,6 记录: 记录号#
课程号 C,4 课程号 0001 0003 0001 0004 0003 0004
成绩 N,5,1 成绩 95.0 88.0 78.0 90.0 78.0 80.0
1 951001 2 951003 3 954006 4 953008 5 951001 6 951003
(每空格 3 分,共 12 分) 试题 1, 阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案. 【程序说明】 某冷饮店出售冰淇淋,第二天的订单必须在当天下午四点钟之前送出,根据统计资料,冰淇淋的销售 与天气有关,晴天可销售 3000 支,阴天可销售 1500 支,下雨天可销售 800 支;该店向冰淇淋厂家订货 批量有 3000 支,2000 支和 1600 支三种;每售出一支冰淇淋可得利润 5 角钱,如果订购的冰淇淋当天没 有及时售出将损失 6 角钱.求第二天某订货批量下的利润? 【程序】 SET TALK OFF CLEAR DO WHILE .T. INPUT '订货批量=' TO PL DO CASE CASE PL=3000 LR1=3000*0.5 LR2=1500*0.5-(3000-1500)*0.6 LR3=800*0.5-(3000-800)*0.6 CASE PL=2000 LR1=2000*0.5 (1) LR3=800*0.5-(2000-800)*0.6 (2) LR1=1600*0.5 LR2=1500*0.5-(1600-1500)*0.6 LR3=800*0.5-(1600-800)*0.6 OTHE (3) (4) ENDCASE EXIT ENDDO ?"订货批量为"+ALLT(STR(PL))+"时,利润分别为:" ?"晴天=",LR1,"阴天=",LR2,"下雨=",LR3 SET TALK ON 【供选择的答案】 (1)A,LR2=1500*0.5-1500*0.6 B,LR2=2000*0.5-(2000-1500)*0.6 C,LR2=1500*0.5-(3000-1500)*0.1 D,LR2=1500*0.5-(2000-1500)*0.6 (2)A,CASE PL=1600 B,OTHERWISE C,IF PL=1600 D,PL<>3000 OR PL<>2000 (3)A,WAIT '订货批量输入有错!重输' B,INPUT '订货批量输入有错!重输' C,ACCEPT '订货批量输入有错!重输' D,? 订货批量输入有错!重输 (4)A,ENDIF B,EXIT C,LOOP D,ELSE (每空格 3 分,共 12 分) 试题 2, , 阅读下列程序说明和程序,在每小题
提供的若干可选答案中,挑选一个正确答案. 【程序说明】 输入学生,求该学生的平均成绩,并显示该学生,和平均成绩. 【程序】 SET TALK OFF CLEAR (5)
USE 学生 SELE 2 USE 成绩 SELE A CJ=0 MS=0 ACCEPT '输入学生的=' TO XH LOCA FOR =ALLT(XH) (6) SELE 成绩 (7) IF =ALLT(XH) CJ=CJ+成绩 MS=MS+1 ENDIF SKIP ENDDO (8) ELSE ?'找不到该学生' ENDIF CLOSE ALL SET TALK ON 【供选择的答案】 (5)A,SELE 5 C,SELE 0 (6)A,IF EOF() C,IF EOF=.F. (7)A,DO WHILE EOF() C,SCAN (8)A,?XH,学生.,CJ C,?XH,学生.,MS/CJ (每空格 3 分,共 12 分) 试题 3, , 阅读下列程序说明和程序,在每小题提供的若干可选答案中,挑选一个正确答案. 【程序说明】 下面是一个抽奖程序,可以实现对表文件("学生.dbf")中记录进行多次不重复随机抽取操作. 【
程序】 事件代码: 表单 FORM1 的 INIT 事件代码: THIS.TIMER1.ENABLED=.F. THIS.TEXT1.VALUE='学生证号' (9) TIMER1 的 TIMER 事件代码: 事件代码: SKIP IF EOF() GO TOP ENDIF (10) B,SELE 学生 D,SELE 2