VF程序填空4.docVIP

VF程序填空4 *------------------------------------------------------- *【程序填空】 *------------------------------------------------------- *功能: 1982年我国第三次人口普查，结果全国人口为10.3亿， * 假如人口增长率为5%。编写一个程序求在公元多少年总 * 人口翻了一番。 * 请在【】处添上适当的内容，使程序完整。 *------------------------------------------------------- SET TALK OFF CLEAR P1=10.3 N=1 R=0.05 P2=P1*(1+R) ***********SPACE********** DO WHILE P2=【】 ***********SPACE********** N=【?】 ***********SPACE********** P2=P2【?】(1+R) ENDD N=1982+N ? N,年人口总数翻了一番 SET TALK ON RETURN *------------------------------------------------------- *【程序填空】 *------------------------------------------------------- *功能:逐条输出数据库student中的jbqk 表中1980年出生的学生 * 的记录。 * 请在【】处添上适当的内容，使程序完整。 *------------------------------------------------------- CLEAR SET TALK OFF OPEN DATABASE student ***********SPACE********** 【use】 jbqk IN 0 打开数据表 SELECT jbqk ***********SPACE********** 【locate for】 YEAR(出生日期)=1980 DO WHILE .NOT.EOF() ***********SPACE********** 【display】 显示当前表当前记录的内容 WAIT CONTINUE ENDDO USE CLOSE ALL SET TALK ON RETURN *------------------------------------------------------- *【程序填空】 *------------------------------------------------------- *功能: 有一个学生管理数据库，其中有二个表，结构如下： * 学生.DBF：学号（C,8），姓名（C,6），性别（C,2）， * 出生日期（D） * 选课.DBF：学号（C,8），课程号（C,3），成绩（N,5,1） *要求：假定学号的第3、4位为专业代码。要计算各专业学生选修 * 课程号为101课程的平均成绩，请填空。 * 请在【】处添上适当的内容，使程序完整。 *------------------------------------------------------- ***********SPACE********** SELECT SUBS【?】 AS 专业, AVG(成绩) AS 平均分 ***********SPACE********** FROM 【?】 ***********SPACE********** WHERE 【?】 GROUP BY 专业 *------------------------------------------------------- *【程序填空】 *------------------------------------------------------- *功能: 逐条输出数据库student中的jbqk 表中1980年出生的学生 * 的记录。 * 请在【】处添上适当的内容，使程序完整。 *------------------------------------------------------- CLEAR SET TALK OFF ***********SPACE********** 【?】 st