大学VF期末考试复习题程序填空

1、程序填空 1. 以下是查找职工表中女职工的最高工资，并显示其姓名和工资的程序，根据已有的程序进行填空。use 职工mgz=0do while_ if 性别=女 and mgz工资 mgz=工资 mxm=姓名 endif _enddo?mgz,mxm _标准答案：not eof()skip use;解答过程：答案1：!eof()答案中英文不区分大小写。2. (1)请依次指出该表单中所使用的控件名称：A处为_控件、B处为_控件、C处为_控件、D处为_控件、E处为_控件。(2)该表单的Caption属性值为_。(3)在登录时，如果希望输入的密码以“*”显示，应该对对应的控件的_属性进行设置。标准答案

2、：组合框标签文本框复选框命令按钮QQ2009正式版passwordchar;解答过程：(1)组合框 或 combo(2)标签 或 label(3)文本框 或 textbox(4)复选框 或 checkbox(5)命令按钮 或 commandbutton3. 题目:列出XSDB.DBF数据表中法律系学生记录，将结果显示输出。USE XSDB.DBFDO WHILE .T.IF 系别=法律 DISPENDIF_IF EOF() _ENDIFENDDO标准答案：skip 1;skipexit;解答过程：4. *题目:求1到100之间的奇数之和、偶数之和，并将奇数之和存入S1、偶数之和存入S2显示输出

3、。请在 _处添上适当的内容，使程序完整。i=1stor 0 to s1,s2do whil i=100 if_ s1=s1+i_ s2=s2+iendif _ENDD?S1,S2标准答案：mod(i,2)0elsei=i+1;解答过程：(1) MOD (I,2) 0 或 INT (I,2) I/2 或 I%2 0 或 MOD (I,2) #0 或 INT (I,2) #I/2 或 I%2 #0(2) ELSE(3) I=I+1 或 I=1+I 或 STOR I + 1 TO I5. 设成绩库CJK.DBF中“数学”（数值型字段）这门课程的学分为4，其学分计算的方法如下： 数学=90，学分值为4

4、 80=数学90，学分值为3 70=数学80，学分值为2 60=数学70，学分值为1 数学=90 XF=4 CASE_XF=3CASE_ XF=2 CASE_ XF=1OTHERWISE XF=0 ENDCASE ?学号:,XH ?数学的学分值:,XF USE RETURN标准答案：数学=80数学=70数学=60;解答过程：6.用两种循环步长值来求1+2+3+50的值，请将程序填写完整。程序一： S=0 FOR_S=S+N ENDFOR ? S RETURN 程序二: S=0 FOR_S=S+N ENDFOR ?S RETURN标准答案：i=1 to 50 i=50 to 1 step -1;

5、解答过程：7. *题目: 百马百担问题：有100匹马，驮100担货，大马驮三担，中马驮2担，两匹小马驮一担，求大、中、小马各多少匹？。*请在 _处添上适当的内容，使程序完整。SET TALK OFFclearfor hb=0 to 100 for hm=0 to 100-_ hs=_ if hb*3+hm*2+_=100 ? 大马有：,hb,中马有：,hm,小马有：,hs endifendfendfset talk on标准答案：hb100-hb-hmhs/2;解答过程：8. *题目:统计300到600之间（包括300和600）能被3整除的数的个数。请在 _处添上适当的内容，使程序完整。GS=

6、0N=300DO WHILE_ IF MOD(N,3)=0 _ ENDIF _ENDDO? 300到600之间（包括300和600）能被3整除的数的个数为,GSRETURN标准答案：n=600gs=gs+1n=n+1;解答过程：(1)或 N=N 或 601 N(2) GS= GS+1 或 GS= 1+GS 或 STOR GS + 1 TO GS(3) N= N+1 或 N= 1+N 或 STOR N + 1 TO N9. *题目:求0-100之间的偶数之和，超出范围则退出。*请在 _处添上适当的内容，使程序完整。clearstore 0 to i,sdo whil_i=i+1if mod(i,

7、2)=0 _ endifenddo?S标准答案：ii;i=is=s+i;s=i+s;store s+i to s;解答过程：1) II 或 I=I2) S= S+I 或 S= I+S 或 STORE S + I TO S10. 题目：求1100之间不能被3整除的整数和。S=0N=1Do While N=100If_ _EndifN=N+1Enddo? S标准答案：mod(N,3)0;mod(n,3)0;n/3!=int(n/3);N/3!=int(N/3)s=s+n;S=S+N;解答过程：1.mod(N,3)0或mod(n,3)0或n/3!=int(n/3)或N/3!=int(N/3)2.s=

8、s+n或S=S+N11. *题目:实现:求0-100之间的奇数之和，超出范围则退出。请在 _处添上适当的内容，使程序完整。X=0Y=0DO WHILE .T. X=X+1 DO CASE CASE _LOOP CASE X=100 _ OTHERWISE Y=Y+XENDCASE_? 0-100之间的奇数之和为: , YRETURN标准答案：mod( x,2) =0EXIT ENDDO;解答过程：(1)或 INT (X/2) =X/2 或 X%2 =0 或 0=MOD (X,2) 或 X/2 = INT(X/2) 或 0= X%2(2)或 Quit(3)或 ENDD12. *题目：下面是计算1

9、+1+2+2+n+n之和的平方根的程序。SET TALK OFFINPUT TO N_FOR I=1 TO N S=_ENDFOR?结果是, SQRT(S)RETURNSET TALK ON标准答案：s=0s+2*i;解答过程：(1)或 Store 0 To S(2)或 2*i+s 或 i*2+s 或 s+i*212. *题目: 从读入的整数数据中，统计大于零的整数个数和小于零的整数个数。用输入零来结束输入，程序中用变量i统计大于零的整数个数，用变量j统计小于零的整数个数。*请在 _处添上适当的内容，使程序完整。SET TALK OFFclearinput 输入整数：to nstore_to

10、i,jdo while_ if n0 i=i+1 endif if N0 j=j+1endif input 输入整数： to n_ ? i=,i ? j=,jset talk onreturn标准答案：0n0enddo;解答过程：(2) 或 n # 0 或 n != 012.*题目:求1到50的累加和（S=1+2+3+.+50）并显示。请在 _处添上适当的内容，使程序完整。H=0I=1DO WHILE_ H=H+I _ENDDO? HRETURN标准答案：i=50i=i+1;解答过程：(1) I I 或 50= I 或 I 51(2) I= I+1 或 I= 1+I 或 STOR I + 1

11、TO I13.下面程序段是求Sum=1+2+3+50，根据已给程序内容填空，补充完成程序。CLEARSum=0i=1DO WHILE_ _ i=i+1ENDDO? “Sum=”,SumRETURN标准答案：i=90.AND.英语=90 REPLACE 奖学金 WITH 奖学金+30 CASE计算机=75.AND.英语=75 REPLACE 奖学金 WITH 奖学金+20_ REPLACE 奖学金 WITH 奖学金+10ENDCASE_ENDDO标准答案：.not.eof()otherwiseuse;解答过程：16*题目：求出1到100之间的奇数积、偶数和。SET TALK OFF_s2=1FOR I=1 to 100 IF MOD(i,2)=_ s1=s1+I Else s2=_ ENDIFNEXT? 奇数积为:,s2?偶数和为:,s1SET TALK ON标准答案：s1=00s2=s2*I;解答过程：(1)或 STOR 0 TO s1(2) 0(3) s