数据库期末复习程序填空及答案.docVIP

1、程序的功能是：在在学生表中查找并输出指定学生的所有信息。 填空要求：程序中共有三个填空，请在“---n---”处填空（注意：不能删除“此处填空”，以便于检查），并调试运行。不得增加或删减程序行。 SET TALK OFF CLEAR USE 学生 INDEX ON 学号 TO IXH此处填空 ACCEPT 请输入指定的学生学号: TO XH 此处填空 SEEK XH IF EOF()此处填空 ? 查无此人! ELSE DISPLAY此处填空 ENDIF USE SET TALK ON 2、给定程序的功能是：判断给定的正整数值表达式的值是否为素数。 填空要求：程序中共有三个填空，请在“---n---”处填空（注意：不能删除“此处填空”，以便于检查），并调试运行。不得增加或删减程序行。 SET TALK OFF CLEAR DO WHILE .T. INPUT 请输入一个正整数: TO X FOR I=2 TO X-1此处填空 IF INT(X/I)=X/I EXIT ENDIF ENDFOR IF I=X 此处填空 ? X,是素数! ELSE ? X,不是素数! ENDIF WAIT 是否继续输入(Y/N) TO YN IF UPPER(YN)=”Y”此处填空 LOOP ELSE EXIT ENDIF ENDDO SET TALK ON 3、给定程序的功能是:输入边长，如果能构成三角形，则计算三角形面积。 填空要求：程序中共有三个填空，请在“---n---”处填空（注意：不能删除“此处填空”，以便于检查），并调试运行。不得增加或删减程序行。 SET TALK OFF DO WHILE .T.此处填空 CLEAR INPUT 输入第一边长: TO X INPUT 输入第二边长: TO Y INPUT 输入第三边长: TO Z IF X=0.OR.Y=0.OR.Z=0.OR. X+Y=Z .OR. Y+Z=X .OR. X+Z=Y ? 尺寸有误,重新输入! LOOP此处填空 ENDIF EXIT ENDDO U=(X+Y+Z)/2 M=SQRT(U*(U-X)*(U-Y)*(U-Z))此处填空 ? AREA=+ALLTRIM（STR(M，19，2)） SET TALK OFF 4、给定程序的功能是:在屏幕上显示输出一个乘法九九表。显示格式如下: 填空要求：程序中共有三个填空，请在“---n---”处填空（注意：不能删除“此处填空”，以便于检查），并调试运行。不得增加或删减程序行。 SET TALK OFF CLEAR X=1此处填空 DO WHILE X=9 Y=1 DO WHILE Y=X ??STR(X,3)+”*”+STR(Y,1)+”=”+STR(X*Y,2)此处填空 Y=Y+1 ENDDO ?此处填空 X=X+1 ENDDO SET TALK ON 5、给定程序的功能是: 根据输入的数据, 计算不大于该数的所有奇数累加和。 填空要求：程序中共有三个填空，请在“---n---”处填空（注意：不能删除“此处填空”，以便于检查），并调试运行。不得增加或删减程序行。 SET TALK OFF CLEAR YN=Y DO WHILE UPPER(YN)=”Y”此处填空 INPUT 请输入两位以内的正整数： TO N STORE 0 TO X,Y DO WHILE XN X=X+1 IF X/2INT(X/2)此处填空 Y=Y+X ENDIF ENDDO ? 不大于该数的奇数累加和=+STR(Y,4) WAIT继续计算否？(Y/N) TO YN 此处填空 ENDDO ? 再见！ SET TALK ON 6、给定程序的功能是: 根据输入的数据，判断该数是否为偶数,可以循环输入。 填空要求：程序中共有三个填空，请在“---n---”处填空（注意：不能删除“此处填空”，以便于检查），并调试运行。不得增加或删减程序行。 SET TALK OFF CLEAR YN=Y DO WHILE UPPER（YN）=“Y”此处填空 INPUT 请输入一个自然数： TO N IF Y/2INT(Y/2)此处填空 ? 不是偶数! ELSE ? 是偶数! ENDIF WAIT 继续否？(Y/N) TO YN此处填空 ENDDO ? 再见！ SET TALK ON 7、给定程序的功能是: 显示指定表中的全部字段名,并由用户输入显示表信息的条