程序分析试题及答案.docVIP

下列程序是用来求长方形的面积，请将它写完整。 X=2 Y=5 S=AREA(X,Y) ? S RETURN FUNCTION AREA __Parameters____ __x,y____ S1=X*Y RETURN?____ _s______ 执行下述程序后，变量X的值是___ __7____，循环体一共运行了___4__ ____次。 X=19 DO WHILE .T. X=X-1 DO CASE CASE MOD(X,3)=0 LOOP CASE X10 EXIT CASE MOD(X,2)=0 X=X/2 ENDCASE ENDDO ? X RETURN 在学生信息.DBF中有性别（C,2）字段，显示女学生的记录。请写出程序空白处的语句。 CLEAR USE 学生信息 DO WHILE NOT EOF() IF 性别=“男” SKIP Loop_ ENDIF DISPLAY WAIT SKIP ENDDO USE 以下程序在”XS”数据表中按姓名查找的某条记录，请在程序的空白处填空。 USE XS ACCEPT” “输入学生姓名：” TO NAME LOCATE ALL FOR ___姓名=NAME _ __ IF FOUND（） ___ display__ ___ _Else___ ?”查无此人” ENDIF 使用SQL实现: 1）检索不及格成绩的学生的学号、姓名和课程名、成绩。 SELECT student.学号,姓名,课程名,成绩 FROM student, course, score WHERE studengt.学号=score.学号 AND course.课程号=score.课程号 AND 成绩60 2）查询成绩都在80分以上的学生信息。 SELECT * FROM student WHERE 学号 NOT IN ; (SELECT 学号 FROM score WHERE 成绩=80); AND 学号 IN (___year（达特（出生日期））_01/01/1988 ____) 3）查询1988年1月1日以后出生的学生信息，将查询结果保存到文本文件csrq.txt中。 SELECT * FROM student WHERE ____ ____ TO FILE csrq.txt 4）查询成绩最高的三名学生的学号、课程号与成绩。 SELECT * ___top_ __3__FROM score ORDER BY 成绩 DESC 下列程序是求出100以内能被3整除但不能被7整除的数据之和，请在_________处填空。 STORE 0 TO S，N DO WHILE N=100 __IF INT(N/3)===N/3 AND INT(N/7)7 S=S+N ENDIF ___N=N+1_ ____ ENDDO ?”S=”+STR(S) 以下程序逐条显示“学生”数据表中1985年出生的学生记录，请在程序的___处填空， 已知数据表中有名为“出生日期”的日期型字段。 USE 学生 LOCATE FOR YEAR(出生日期)=1985 DO WHILE ___NOT EOF() DISP WAIT ___SKIP_ ENDDO USE 有如下表：（1）XS.DBF(学号 C(9)，姓名 C(8)，性别 C(2)，专业C(10)，出生日期 D，走读 L)；（2）CJ.DBF(学号 C(9)，课程名 C(20)，成绩N(5,1)) 一个学生可以选择多门课程。请编写一个完整的程序，该程序能完成以下功能： （1）将表XS.DBF和表CJ.DBF建立关联，并显示出所有男同学的姓名以及他们所选课程的课程名。 （2）将XS.DBF表中所有班级为“计算机应用”的同学信息拷贝到新表STUDENT.DBF中，STUDENT .DBF只含有学号、姓名、性别、出生日期四个字段 （3）将姓名为“王小平”的同学的所有成绩提高10% CLEAR CLOSE ALL SELE 2 USE CJ INDEX ON 学号 TAG XH SELE 1 USE XS SET RELATION TO B SET SKIP TO B LIST FOR 性别=男 FIELDS 姓名,B.课程名 COPY TO STUDENT FOR SUBSTR(“200901”) IELDS 学号,姓名,性别,专业 replace b.成绩 with 成绩=成绩*N for a.姓名=王小平 以下程序计算1—100之间的所有奇数的平方和并显示出来，请在程序的_____处填空