《2022年大学VF期末考试复习题,程序改错 .pdf》由会员分享，可在线阅读，更多相关《2022年大学VF期末考试复习题,程序改错 .pdf（4页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、程序改错1. 题目：显示XS.DBF表中 1976 年后出生的学生名单。*FOUND* OPEN XS改为： _ *FOUND* DISPLAY FIEL 姓名 FOR出生年月 =1976-01-01改为： _ USE 标准答案：USE XS LIST FIEL 姓名 FOR 出生年月 =1976-01-01; 解答过程：2. *题目：求2!+4!+6!+ +10! 的和。*注意：不可以增加或删除程序行，也不可以更改程序的结构。SET TALK OFF S=0 *FOUND* T=0改为： _ FOR N=2 TO 10 *FOUND* T=T*(T-1)改为： _ IF N%2=0 *FOU
2、ND* S=S+N 改为： _ ENDIF ENDFOR ? S 标准答案：T=1 T= T * N S= S + T; 解答过程：(2)T= T * N 或 T= N * T (3)S= S + T或S= T + S 3. 题目：将 XSDB.DBF表中奖学金超过60 元的学生姓名和奖学金显示在屏幕上。USE XSDB *FOUND* IF 奖学金 60改为： _ DO WHILE .NOT.EOF() *FOUND* ?姓名 =+姓名 , 奖学金 =+ 奖学金改为： _ CONTINU ENDDO USE 标准答案：locate for 奖学金 60 ? ; 解答过程：2.? 姓名 =+
3、姓名 , 奖学金 =+str(奖学金 )或 ? 姓名 =+姓名 , 奖学金 =, 奖学金4. *题目：计算 S=2+4+6+.+98的程序。*注意：不可以增加或删除程序行，也不可以更改程序的结构。store 0 to s,i *FOUND* do i=99改为： _ *FOUND* i=i+1 改为： _ s=s+i enddo ?s=,s 标准答案：do while i=99 ; do while i100 ; do while i= 98;do while i=5改为： _ INPUT 请输入下一个数: TO X IF MA=1 ; DO WHIL N=1 ?; 解答过程：6. 下面程序段
4、的功能是实现两个整数从小到大排序输出，在程序中有*FOUND*标记的下面一行语句是错误的，请将错误的语句改正过来。CLEAR INPUT 请输入一个整数： TO a INPUT 请输入另一个整数： TO b IF ab temp=a *FOUND* b=temp改为： _ *FOUND* a=b 改为： _ ENDIF ? a,b RETURN 标准答案：a=b b=temp; 解答过程：答案中英文不区分大小写。7. *题目：计算1!+3!+9!的结果并输出。*注意：不可以增加或删除程序行，也不可以更改程序的结构。M=1 S=0 DO WHILE MM改为： _ P=P*I I=I+1 END
5、DO S=S+P *FOUND* M=M+3 改为： _ ENDDO ? 1!+3!+9!=,S 标准答案：DO WHILE I=I M=M*3 ; M=3*M; 解答过程：8.* 题目 :计算并在屏幕上显示出 九九乘法表 ，显示格式如下1 1 1 2 1 2 2 24 3 1 3 3 26 3 39 9 1 9 9 8 72 9 981 *程序中共有2 个错误，请修改下面一条语句的错误，并调试运行。*注意：不可以增加或删除程序行，也不可以更改程序的结构。X=1 DO WHILE X=9 Y=1 *FOUND* DO WHILE Y=9改为： _ ?STR(X,1)+STR(Y,1)+=+ST
6、R(X*Y,2)+ Y=Y+1 ENDDO *FOUND* disp 改为： _ X=X+1 ENDDO 标准答案：DO WHILE Y=Y 9.* 题目：键盘输入X 值时 , 求其相应的Y值 -1 (X0) *注意：不可以增加或删除程序行，也不可以更改程序的结构。SET TALK OFF *FOUND* ACCEPT 请输入一个数： TO X改为： _ *FOUND* DO WHILE 改为： _ CASE X0 改为： _ Y=1 ENDCASE ? Y SET TALK OFF 标准答案：INPUT DO CASE OTHERWISE ; case x0; 解答过程：10. *题目：计算
7、出1-30 以内（包含30）能被 5 整除的数之和。*注意：不可以增加或删除程序行，也不可以更改程序的结构。CLEAR SET TALK OFF X=0 *FOUND* Y=1改为： _ DO WHILE .T. X=X+1 DO CASE CASE MOD(X,5)=0 Y=Y+X CASE X30 *FOUND* LOOP改为： _ ENDCASE ENDDO ?Y SET TALK ON 标准答案：Y=0 LOOP EXIT ; 解答过程：1.STORE 0 TO Y 3. QUIT 11. *题目：求1+5+9+13+ +97 的和。*注意：不可以增加或删除程序行，也不可以更改程序的结
8、构。SET TALK OFF S=0 *FOUND* N=0改为： _ DO WHILE N=97 *FOUND* S=S+1改为： _ N=N+4 *FOUND* ENDWHILE改为： _ ? S SET TALK ON 标准答案：N=1 S= S + N ENDDO; 解答过程：1. STOR 1 TO N 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 2 页，共 4 页 - - - - - - - - - 2. S= N + S 3.ENDD 12. *题目：从键盘输入十个
9、非零整数，统计能被3 整除的数的个数。*注意：不可以增加或删除程序行，也不可以更改程序的结构。STORE 0 TO I,A *FOUND* DO WHILE I=10 改为： _ INPUT 请输入一个整数: TO N *FOUND* IF INT(N/3)=0 改为： _ A=A+1 ENDIF I=I+1 ENDDO ?A 标准答案：DO WHILE I10 ; DO WHILE I=I;DO WHILE 10I IF MOD( N,3) =0 ; IF N%3 =0; 解答过程：13. *题目：求X =1+2+3+ +100 ，并同时求出 1 到 100 之间的奇数之和Y，而且显示输出这
10、两个和。*注意：不可以增加或删除程序行，也不可以更改程序的结构。CLEAR STORE 0 TO I , X , Y *FOUND* DO WHILE I=100 改为： _ I = I+1 X =X+I IF I/2 = INT(I/2) *FOUND* EXIT 改为： _ ENDIF Y=Y+I ENDDO ?X,Y RETURN 标准答案：DO WHILE I 100 ; DO WHILE I = 99 ; DO WHIL I 100 ;DO WHIL I = 99 LOOP; 解答过程：14.* 题目： 计算出 1 到 50 以内（包含 50）能被 2 和 3 整除的数之和。*注意：
11、不可以增加或删除程序行，也不可以更改程序的结构。STOR 0 TO X ,Y *FOUND* DO WHILE NOT EOF()改为： _ X=X+1 DO CASE CASE MOD(X,2)=0 AND MOD(X,3)=0 Y=Y+X CASE X50 EXIT ENDCASE ENDDO ?Y 标准答案：DO WHILE .T. LOOP; 解答过程：15. 下面程序段的功能是求5! ，在程序中有 *FOUND*标记的下面一行语句是错误的，请将错误的语句改正过来。CLEAR *FOUND* p=0改为： _ FOR i=1 TO 5 *FOUND* p=p+p*i改为： _ ENDF
12、OR ? 5 ！ =,p RETURN标准答案：p=1 p=p*i; 解答过程：答案中英文不区分大小写。16.* 题目 : 输入 10，计算s=1+1+2+1+2+3+.+1+2+3+4+.+10请在屏幕上输出结果。*注意：不可以增加或删除程序行，也不可以更改程序的结构。set talk off clear *FOUND* s=p=0改为： _ for i=1 to 10 *FOUND* p=p-i 改为： _ s=s+p endf *FOUND* ? p=,p 改为： _ 标准答案：store 0 to s,p p= p + i ? ; 解答过程：(1) 或 store 0 to p,s (
13、2) 或 p=i + p 17.* 题目： 从键盘上输入5 个数， 统计其中奇数的个数。*注意：不可以增加或删除程序行，也不可以更改程序的结构。SET TALK OFF A=0 FOR J=1 TO 5 *FOUND* ACCEPT 请输入第 +STR(J,2)+ 数 TO M改为： _ *FOUND* IF INT(M/2)=M/2 改为： _ A=A+1 ENDIF ENDFOR *FOUND* 名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 3 页，共 4 页 - - - -
14、- - - - - ?奇数个数是,A 改为： _ 标准答案：INPUT #;!=; ? ; 解答过程：18.* 题目：求1 到 10 之间奇数的阶乘和t=1!+3!+5!+ +9! *注意：不可以增加或删除程序行，也不可以更改程序的结构。*FOUND* t=1改为： _ P=1 I=1 *FOUND* Do while I10 改为： _ p=p*I *FOUND* if int(i/2)=i/2 改为： _ t=t+p endif i=i+1 Enddo ?t=,t 标准答案：t=0 do while I=i (3) 或 #或 19.* 题目：通过字符串变量操作先竖向显示 伟大祖国 ，再横向
15、显示祖国伟大 。*注意：不可以增加或删除程序行，也不可以更改程序的结构。STORE 伟大祖国 TO XY CLEA *FOUND* N=0 改为： _ DO WHILE N8 ?SUBS(XY,N,2) N=N+2 ENDDO ? *FOUND* ?SUBS(XY,4,4) 改为： _ ?SUBS(XY,1,4) 标准答案：N=1 ; STOR 1 TO N ?SUBS(XY, 5,4); 解答过程：20.* 题目：本程序计算1! 3! 9! 的乘积。*注意：不可以增加或删除程序行，也不可以更改程序的结构。SET TALK OFF M=1 *FOUND* S=0改为： _ DO WHILE M=9 I=1 P=1 *FOUND* DO WHILE M=9 改为： _ P=P*I I=I+1 ENDDO S=S*P *FOUND* M=M+3 改为： _ ENDDO ? 1!3! 9!=,S SET TALK ON RETURN 标准答案：S=1 DO WHILE I=I M= M * 3; 解答过程：名师资料总结 - - -精品资料欢迎下载 - - - - - - - - - - - - - - - - - - 名师精心整理 - - - - - - - 第 4 页，共 4 页 - - - - - - - - -