当前位置:文档之家› 计算机程序改错题,及答案

计算机程序改错题,及答案

11*程序名:TEST.prg*检索选修课程门数等于3门或3门以上,每门课程成绩大于或等于70分的每个学生的*学号,姓名,性别,平均成绩,最低分和选课门数,并将结果存储到表NEW_TEST中.*以下程序有三处错误,请改正OPEN DA TABASE SDBSELECT STUDENT.学号,姓名,性别,A VG(成绩) 平均成绩,MIN(成绩) 最低分,COUNT(*) 选课门数;FROM STUDENT,SC;WHere STUDENT.学号= SC.学号AND 成绩>= 70 ; &&**********Error**********GROUP BY STUDENT.学号HA VING count(课程号) >= 3; &&**********Error**********inTO table NEW_TEST &&**********Error********** CLOSE ALL9*程序名:dbtest3.prg*定义一个视图VS1,*检索选课门数是3门以上的每个学生的学号、姓名、平均成绩、最低分、选课门数和院系编号,*并按平均成绩降序排序.*以下程序有三处错误,请改正SET TALK OFFSET SAFETY OFFopen DATABASE SDB &&****Error***修改本行的语法错误,不许注释掉本行或删除本行CREATE VIEW VS1SELECT STUDENT2.学号, 姓名, A VG(成绩) 平均成绩, MIN(成绩) 最低分, COUNT(*) 选课门数, 院系编号;FROM STUDENT2, sc; &&*************Error*************WHERE STUDENT2.学号= SC.学号;GROUP BY SC.学号HA VING COUNT(课程号) > 3;ORDER BY 平均成绩desc &&*************Error*************CLOSE DATABASERETURNi=2create table four(结果I)do while i<=1000if i%3=0insert into four values(i) &&错误语句请修改endifi=i+1 && 请增加一条语句enddocreate database 学习情况create table 学生(姓名C(20),学号C(10) primary key) &&有错误alter table 学生add总分I &&有错误alter table 学生alter总分set check 总分<=800 and 总分>=0 &&有错误insert into 学生values ("林红","20100808",788) &&有错误update 学生set 总分=786 where 学号="20100808"&&有错误alter table employee alter 性别set check 性别="男" or 性别="女"SELECT Department.部门名, count(*) as 总人数;FROM employee_m!department INNER JOIN employee_m!employee ;ON Department.部门号= Employee.部门;group by 部门号;INTO TABLE tone.dbfSELECT Department.部门名, count(*) as 人数_男;FROM employee_m!department INNER JOIN employee_m!employee ;ON Department.部门号= Employee.部门;where 性别="男";group by 部门号;INTO TABLE ttwo.dbfSELECT tone.部门名, ttwo.人数_男, 总人数-人数_男as 人数_女, tone.总人数;FROM tone INNER JOIN ttwo ;on tone.部门名=ttwo.部门名;order by tone.部门名desc;INTO TABLE tableone12*程序名:dbtest61.prg*检索同时选修课程号c1和c2的学生的学号*以下程序有三处错误,请改正SELECT 学号;FROM SC ;WHERE 课程号= 'c1' AND 学号in ; &&************Error************ ( SELECT 学号FROM SC ; &&************Error************WHERE 课程号= 'c2' ) &&************Error************CLOSE DATABASE*程序名:dbtest4.prg*检索选课门数大于或等于3门以上的每个学生的学号、姓名、平均成绩、最低分、选课门数和院系,*并按平均成绩降序排序,将结果存储到表TEST1中.*以下程序有三处错误,请改正SET TALK OFFSET SAFETY OFFSELECT STUDENT.学号, 姓名, A VG(成绩) 平均成绩, MIN(成绩) 最低分, COUNT(*) 选课门数,院系院系;FROM STUDENT, SCORE;WHERE STUDENT.学号= SCORE.学号;GROUP BY STUDENT.学号HA VING count(课程编号) >= 3; &&*********Error************ ORDER BY 平均成绩desc; &&*********Error************INTO table TEST1 &&*********Error************RETURN18 $$75所有器件的单价增加5元UPDATE order_detail1 SET 单价=单价+ 5计算每种器件的平均单价SELECT 器件号,A VG(单价) AS 平均价FROM order_detail1 group BY 器件号INTO CURSOR lsb&&查询平均价小于500的记录SELECT * FROM lsb where平均价< 50019&&功能:如果用户输入的用户名和口令一致,则在提示信息后关闭该表单;&&否则重新输入用户名和口令。

&&**********Error**********************if thisform.text1.text = thisform.text2.textwait "欢迎使用……" window timeout 1&&**********Error**********************thisform.releaseelsewait "用户名或口令不对,请重新输入……" window timeout 1endif20&&使表单的标题为:简单应用thisform.caption="简单应用"&&在表格控件中显示order_list表的记录thisform.grid1.recordsource="order_list.dbf"&&关闭表单thisform.release32open database 外汇数据use currency_sl&&***********Error*****************locate for 姓名="林诗因"summ=0&&***********Error*****************do while not eof()select 现钞买入价from rate_exchange ;where rate_exchange.外币代码=currency_sl.外币代码into array a &&***********Error*****************summ=summ+a[1] * currency_sl.持有数量continueenddo?summ37***在下一行添加一条打开customer表的语句, 然后把"(此处空行)"删除use customer***表没有索引,修改如下语句使之能显示所有“北京”客户的信息SCAN for所在地='北京'? 客户编号,公司名称,联系人姓名ENDSCAN38SELECT 零件名称FROM 零件信息WHERE 零件号in ;(SELECT 零件号FROM 使用零件;GROUP BY 零件号HA VING COUNT(项目号) = 3) ;ORDER BY 零件名称;to FILE results45(15)*下面的程序在第1行、第2行和第5行有错误,请直接在错误处修改。

*修改时,不可改变SQL语句的结构和短语的顺序,不允许增加或合并行。

open database sdbCREATE VIEW s_view as ;SELECT Class.班级号, 班级名, 姓名, 性别, 教师名AS 班主任名;FROM Student,Class,Teacher ;WHERE Student.班级号= Class.班级号and Teacher.教师号= Class.班主任号46(15)*下面的程序在第5行、第6行、第8行和第9行有错误,请直接在错误处修改。

*修改时,不可改变SQL语句的结构和短语的顺序,不允许增加或合并行。

OPEN DATABASE SELLDBSELECT S_T.部门号,部门名,年度,;一季度销售额+ 二季度销售额+ 三季度销售额+ 四季度销售额AS 全年销售额,;一季度利润+ 二季度利润+ 三季度利润+ 四季度利润AS 全年利润,;(一季度利润+ 二季度利润+ 三季度利润+ 四季度利润)/ (一季度销售额+ 二季度销售额+ 三季度销售额+ 四季度销售额)AS 利润率;FROM S_T,DEPT;WHERE S_T.部门号= DEPT.部门号;order BY 年度,利润率DESC;INTO table S_SUM49*本程序的功能为输入圆柱体的半径和高,计算圆柱体表面积。

相关主题