5850-2002x-数据库原理与应用.doc

五、写出下列程序或命令组的功能（每小题5分，共20分） CLEAR ET TALK OFF USE 读者 ACCEPT “请输入姓名：” TO XM SCAN FOR 姓名=XM IF. EOT.EOF（） DISP Else ?“查无此人！” endif USE RETURN 2.INPUT “给X输入一个正整数：” TOX ?“” I=0 P=1 DO WHILE IX I=I+1 IF I%2=0.OR.I%3=0 LOOP ENDIF P=P*I ENDDO ?“P=”，P return 3.SELECT *; FROM 读者 4．SELECT 借书证号，COUNT（*）; FROM 借阅； WHERE 借书日期={99/01/01}; GROUP BY 借书证号； HAVING COUNT(*)=2 六、简单编程（20分） Foxpro编程（10分） 根据“图书”库文件，用自定义格式和数组形式实现一个图书记录追加程序。（10分） 要求：程序可连续输入记录。 SQL查询程序：写出SQL查询的命令或命令组。（每小题5分，共10分） 查询出“图书”库中出版单位是“电子工业出版社”的所有图书。 按单位分组统计出借阅图书的人数。 read if upper(a)=“N” exit endif enddo return 2.SQL查询（每小题5分，共10分） （1）select * ; from 图书 where 出版单位=“电子工业出版社” （２）SELECT 单位，COUNT（*）； FROM读者，借阅； WHERE 读者，借书证号=借阅，借书证号； GROUP BY 单位 你一定要坚强，即使受过伤，流过泪，也能咬牙走下去。因为，人生，就是你一个人的人生。 ============================================================================== 命运如同手中的掌纹，无论多曲折，终掌握在自己手中 ==============================================================