二、3.編寫一個(gè)課程信息的錄入程序。要求在錄入一門課程后屏幕詢問:“繼續(xù)錄入嗎?”,根據(jù)用戶回答決定程序流程。
要求不退出本程序能繼續(xù)進(jìn)行錄入操作。 (20分)
4.用FoxPro語言或SQL語言編寫程序完成以下查詢。(以下四題依次為10分、10分、15分、20分)
(1)列出學(xué)生名單,要包含所有學(xué)生的所有屬性,且在最后一行顯示:
年齡小于18歲的男生有 xx 人。
(2)列出成績不及格的學(xué)生的信息,要包含選修表的所有屬性,且在最后一行顯示:
他們的平均成績?yōu)?xx 分 .
(3)統(tǒng)計(jì)數(shù)學(xué)系每個(gè)學(xué)生姓名,性別,年齡,以及該學(xué)生所學(xué)課程的總成績并列表顯示。
(4)檢索選課在2門及2門以上的學(xué)生的學(xué)號(hào)、姓名、總學(xué)分和平均成績并列表顯示。不及格的課程不統(tǒng)計(jì)在內(nèi)。
答案: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
?“他們的平均成績?yōu)椋骸?/p>
??a
??“分”