三、读程序(本大题共5小题,每小题4分,共20分)
认真阅读所给的程序,每段程序后面会根据上面的程序给出几个小题,每小题列出的四个备选项中只有一个是符合题目要求的,请将其选出并将“答题纸”的相应代码涂黑。错涂、多涂或未涂均无分。
【程序(一)】
*Teacher表中有姓名、工龄、级别、津贴等字段,现要根据用户输入的姓名修改其级别和津
贴,程序如下:
CLEAR
USE Teacher
xm=SPACE(8)
ACCEPT “ 请输入姓名: ” TO xm
LOCATE FOR alltrim(姓名)=alltrim(xm)
IF ______
DISPLAY
WAIT “ 以上是修改前的记录 ”
ACCEPT “ 请输入新的级别: ” TO jb
REPLACE 级别WITH VAL(jb)
IF jb>5
REPLACE 津贴 WITH 津贴*1.2
Endif
DISPLAY FIELDS 姓名、工龄、级别、津贴
WAIT “ 以上是修改后的记录 ”
ELSE
WAIT “无此姓名!”
ENDIF
USE
RETURN
31.本程序中,横线处IF语句的条件表达式为
A.FOUND() B.NOT EOF()
C.SEEK D.姓名=xm
32.若已经对“姓名”字段建立索引,将程序中“LOCATE ALL FOR alltrim(姓名)=alltrim(xm)”,这句查询命令改成seek命令,以下哪个选项是正确的?
A.seek “alltrim(xm)” B.seek alltrim(学号)=alltrim(xm)
C.seek alltrim(xm) D.seek “alltrim(学号)=alltrim(xm)”
33.如果被修改的员工,其程序运行前的级别是3级,津贴为2000元,程序运行后的将级别改为6级,则程序运行后该员工的津贴为
A.1600 B.2000
C.2400 D.3000
【程序(二)】
*STU表中有学号、姓名、班级、平均分、操行、奖学金等字段,现要修改奖学金字段的值,程序如下:
SET TALK OFF
USE STU
DO WHILE.NOT.EOF()
ZX=操行
AV=平均分
DO CASE
CASE AV>=75.00 .AND. AV<80.00 .AND. ZX=”良”
JXJ=”丙等”
CASE AV>=80.00 .AND. AV<90.00 .AND. (ZX=”优” .OR.ZX=”良”)
JXJ=”乙等”
CASE AV>=90.00 .AND. ZX=”优”
JXJ=”甲等”
OTHERWISE
JXJ=”无奖学金”
ENDCASE
REPLACE 奖学金 WITH JXJ
______
ENDDO
LIST
USE
SET TALK ON
34.程序中划线处应填写的代码是
A.ENDIF B.SKIP
C.ENDDO D.IF FOUND()
35.若表中有一条记录,该记录的平均分为78,操行为”优”,则程序运行后,该记录的奖学金字段的值为
A.甲等 B.乙等
C.丙等 D.无奖学金