辽宁医学院 程序填空题 题库.docVIP

程序填空 1. 功能: 已知表文件学生.DBF,向学生表中追加记录。 SET TALK OFF USE 学生 DO WHILE .T. APPEND WAIT 继续添加记录吗?(Y/N) TO K IF UPPER(K)=Y 【?】 ELSE 【?】 ENDIF ENDDO RETURN 答案为： exit loop 2. 功能: 已知表文件入学成绩.DBF和学生.DBF,将两表按学号字段建立关联并显示学生的姓名和语文信息。 SET TALK OFF SELECT 2 USE 入学成绩 INDEX ON 【?】 TO XH SELECT 1 USE 学生 SET RELATION TO 学号 INTO B LIST 姓名,【?】 USE RETURN 答案为：学号 、B.语文 3. 功能:显示数据表学生.DBF中男同学的信息。 SET TALK OFF USE 学生 LOCATE FOR 性别=男 DO WHILE 【?】 DISP 【?】 ENDDO USE RETU 答案为： .not. eof() 、 continue 4. 功能: 已知表文件学生.DBF,按姓名快速查找并显示指定记录。 SET TALK OFF USE 学生 ACCEPT 输入姓名 TO XM INDE ON 姓名 TO SS 【?】 XM 【?】 USE RETURN 答案为：seek、 display 5. 功能: 已知表文件学生.DBF,按姓名查找学生记录，如果找到了，显示当前记录，否则显示 查无此人。 SET TALK OFF USE 学生 ACCEPT 输入姓名： TO NAME LOCATE FOR 姓名=NAME IF FOUND() 【?】 ELSE 【?】 ENDIF USE RETURN 答案为：display 、 ? ‘查无此人’ 6. 功能:显示数据表学生.DBF中计算机专业同学的信息。 SET TALK OFF USE 学生 LOCA FOR 专业=计算机 DO WHIL 【?】 EOF() DISP 【?】 ENDDO USE Return 答案为：.not. 、 continue 7. 功能: 已知数据库文件P.DBF和Q.DBF,要求修改Q.DBF文件中N2字段的值，使其成为该字段的原来值与P.DBF文件中相应记录N1字段值的乘积.（注意：只能选用第1和第2工作区） SET TALK OFF CLEAR SELE 1 USE P INDE ON M TO MN SELE 【?】 USE Q SET RELA TO 【?】 INTO A REPL 【?】 N2 WITH N2*A-N1 LIST close data SET TALK ON Return 答案为： 2 、M、all 8. 题目：统计学生表中入学成绩大于等于570分的同学的人数。 SET TALK OFF USE 学生 N=0 DO WHILE .NOT.EOF() IF 入学成绩【?】 N=N+1 ENDIF 【?】 ENDDO ?N USE Return 答案为：=570 、 skip 1 9. 功能: 已知表文件学生.DBF和选课.DBF,按学号建立学生表和选课表的关联。 SET TALK OFF SELE 1 USE 选课 INDE ON 【?】 TO XH SELE 2 USE 学生 SET RELA TO 学号 INTO 【?】 LIST 姓名, A.成绩 RETURN 答案为： 学号 、 A 10. 功能: 已知表文件学生.DBF,索引查询1991年8月25日出生的学生记录。 SET TALK OFF CLEAR USE 学生 【?】 ON 出生日期 TO CR 【?】{^1991/08/25} DISPLAY RETURN 答案为： index、 seek 11*功能: 已知表文件学生.DBF,以下程序实现按从首记录到末记录的顺序逐条地显示学生表中的记录。 SET TALK OFF USE 学生 DO WHILE 【?】 DISP 【?】 ENDDO USE RETURN 答案为：.not.eof() 、 skip1 12. 功能: 已知表文件学生.DBF,编程实现按从末记录到首记录的顺序逐条地显示学生表中的记录。 SET TALK OFF USE 学生 GO BOTTOM DO WHILE 【?】 DISP 【?】 ENDDO USE RETURN 答案为： .not.bof() 、 skip -1 13. 功能: 已知表文件学生.DBF和入学成绩.DBF,将学生表和入学成绩表按学号建立关联并显示。 SET TALK OFF SELECT 1 USE 入学成绩 INDEX O