题目:统计XSDB.DBF表中英语不及格人数并显示在屏幕上。USE XSDBN=0DO WHILE !EOF()***********FOUND********** IF 系别=英语N=N+1 ENDIF***********FOUND**********CONTINUEENDDO?”英语不及格人数:”+STR(N,3)USE
举一反三
- 题目:打开XSDB.DBF数据表, 分别统计男、女生的人数。USE XSDBSTOR 0 TO B,GDO WHILE .NOT.EOF( )***********FOUND**********IF 性别<;>;”男”B=B+1***********FOUND**********ENDIFG=G+1ENDIFSKIPENDDO?”男生人数是:”+STR(B)?”女生人数是:”+STR(G)
- 输入n,再依次输入n位同学的成绩,对输入的成绩进行统计及格与不及格信息。输入的n小于0时,输出“ERROR”。输出结果包括:输入的原始成绩数据及格人数不及格人数
- 题目:查找RSH.dbf 中女职工的最高工资,并显示其姓名和工资。USE RSHMGZ = 0DO WHILE .NOT.EOF( )***********FOUND**********IF 性别=”女”,MGZ<;”工资”MGZ=工资MXM=姓名ENDIF***********FOUND**********CONTENDDO?MXM,MGZUSE
- 题目:显示XSDB.DBF中每个学生的姓名、计算机成绩和等级;等级划分如下:计算机成绩大于等于90显示”优秀”;60到89(包括 60和89)之间显示”及格”;60分以下显示”补考”。* 如显示:张丽娜 90 优秀。USE XSDBDO WHIL .NOT. EOF( )***********FOUND**********LIST 姓名,计算机DO CASECASE 计算机>;=90??’优秀’CASE 计算机>;=60??’及格’OTHERWISE??’补考’ENDCASE***********FOUND**********GO NEXTENDDOUSE
- 程序改错题 :题目:将XSDB.DBF表中奖学金超过60元(包括60)的学生姓名和奖学金显示在屏幕上。*注意:不可以增加或删除程序行,也不可以更改程序的结构。将改正后的完整答案填写在题目下面对应的空处。USE XSDBDO WHILE .NOT.EOF()***********FOUND**********IF 奖学金=60?”姓名=”+姓名,”奖学金=”+str(奖学金)ENDIF***********FOUND**********CONTINUEENDDOUSE