二、3.编写一个课程信息的录入程序。要求在录入一门课程后屏幕询问:“继续录入吗?”,根据用户回答决定程序流程。
要求不退出本程序能继续进行录入操作。 (20分)
4.用FoxPro语言或SQL语言编写程序完成以下查询。(以下四题依次为10分、10分、15分、20分)
(1)列出学生名单,要包含所有学生的所有属性,且在最后一行显示:
年龄小于18岁的男生有 xx 人。
(2)列出成绩不及格的学生的信息,要包含选修表的所有属性,且在最后一行显示:
他们的平均成绩为 xx 分 .
(3)统计数学系每个学生姓名,性别,年龄,以及该学生所学课程的总成绩并列表显示。
(4)检索选课在2门及2门以上的学生的学号、姓名、总学分和平均成绩并列表显示。不及格的课程不统计在内。
答案:3
答案:4_1
close all
clear
select 1
use s
select 2
use c3
select 3
use sc
select s.sno ,s.sname ,s.sex ,s.birth ,c3.cno , c3.cname ,c3.scarce , sc.grade ;
from s, c3 , sc to screen;
where (s.sno = sc.sno) and (c3.cno = sc.cno)
select 1
count for ( year(date()) - year(birth) 18 ) and (sex = “m”) to a
?“年龄 18岁的男生有”
?? a
??“人”
答案:4_2
clear
set talk off
use sc
list for grade 60 off
?
use sc
average grade to a
?“他们的平均成绩为:”
??a
??“分”