搜索
程序填空1.以下是查找职工表中女职工的最高工资，并显示其姓名和工资的程序，根据已有的程序进行填空。use职工mgz=0dowhile________if性别='女'andmgz工资mgz=工资mxm=姓名endif________enddo?mgz,mxm________标准答案：noteof()skipuse;解答过程：答案1：!eof()答案中英文不区分大小写。2.(1)请依次指出该表单中所使用的控件名称：A处为________控件、B处为________控件、C处为________控件、D处为________控件、E处为________控件。(2)该表单的Caption属性值为________。(3)在登录时，如果希望输入的密码以“*”显示，应该对对应的控件的________属性进行设置。标准答案：组合框标签文本框复选框命令按钮QQ2009正式版passwordchar;解答过程：(1)组合框或combo(2)标签或label(3)文本框或textbox(4)复选框或checkbox(5)命令按钮或commandbutton3.题目:列出XSDB.DBF数据表中法律系学生记录，将结果显示输出。USEXSDB.DBFDOWHILE.T.IF系别=法律DISPENDIF________IFEOF()________ENDIFENDDO标准答案：skip1;skipexit;解答过程：4.*题目:求1到100之间的奇数之和、偶数之和，并将奇数之和存入S1、偶数之和存入S2显示输出。请在_____处添上适当的内容，使程序完整。i=1stor0tos1,s2dowhili=100if________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%20或MOD(I,2)#0或INT(I,2)#I/2或I%2#0(2)ELSE(3)I=I+1或I=1+I或STORI+1TOI5.设成绩库CJK.DBF中“数学”（数值型字段）这门课程的学分为4，其学分计算的方法如下：数学＞=90，学分值为480=数学90，学分值为370=数学80，学分值为260=数学70，学分值为1数学60，学分值为0计算任一学生数学这门课程的学分值的程序如下:SETTALKOFFUSECJKACCEPT输入学号:TOXHXF=0LOCATEFOR学号=XHDOCASECASE数学=90XF=4CASE________XF=3CASE________XF=2CASE________XF=1OTHERWISEXF=0ENDCASE?学号:,XH?数学的学分值:,XFUSERETURN标准答案：数学=80数学=70数学=60;解答过程：6.用两种循环步长值来求1+2+3+……+50的值，请将程序填写完整。程序一：S=0FOR________S=S+NENDFOR?SRETURN程序二:S=0FOR________S=S+NENDFOR?SRETURN标准答案：i=1to50i=50to1step-1;解答过程：7.*题目:百马百担问题：有100匹马，驮100担货，大马驮三担，中马驮2担，两匹小马驮一担，求大、中、小马各多少匹？。*请在_____处添上适当的内容，使程序完整。SETTALKOFFclearforhb=0to100forhm=0to100-________hs=________ifhb*3+hm*2+________=100?大马有：,hb,中马有：,hm,小马有：,hsendifendfendfsettalkon标准答案：hb100-hb-hmhs/2;解答过程：8.*题目:统计300到600之间（包括300和600）能被3整除的数的个数。请在_____处添上适当的内容，使程序完整。GS=0N=300DOWHILE________IFMOD(N,3)=0________ENDIF________ENDDO?300到600之间（包括300和600）能被3整除的数的个数为,GSRETURN标准答案：n=600gs=gs+1n=n+1;解答过程：(1)或N601或600=N或601N(2)GS=GS+1或GS=1+GS或STORGS+1TOGS(3)N=N+1或N=1+N或STORN+1TON9.*题目:求0-100之间的偶数之和，超出范围则退出。*请在_____处添上适当的内容，使程序完整。clearstore0toi,sdowhil________i=i+1ifmod(i,2)=0________endifenddo?S标准答案：i100;100i;i=99;99=is=s+i;s=i+s;stores+itos;解答过程：1)I100或100I或I=99或99=I2)S=S+I或S=I+S或STORES+ITOS10.题目：求1～100之间不能被3整除的整数和。S=0N=1DoWhileN=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=s+n或S=S+N11.*题目:实现:求0-100之间的奇数之和，超出范围则退出。请在_____处添上适当的内容，使程序完整。X=0Y=0DOWHILE.T.X=X+1DOCASECASE________LOOPCASEX=100________OTHERWISEY=Y+XENDCASE________?0-100之间的奇数之和为:,YRETURN标准答案：mod(x,2)=0EXITENDDO;解答过程：(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+1+2+2+…+n+n之和的平方根的程序。SETTALKOFFINPUTTON________FORI=1TONS=________ENDFOR?结果是,SQRT(S)RETURNSETTALKON标准答案：s=0s+2*i;解答过程：(1)或Store0ToS(2)或2*i+s或i*2+s或s+i*212.*题目:从读入的整数数据中，统计大于零的整数个数和小于零的整数个数。用输入零来结束输入，程序中用变量i统计大于零的整数个数，用变量j统计小于零的整数个数。*请在_____处添上适当的内容，使程序完整。SETTALKOFFclearinput输入整数：tonstore________toi,jdowhile________ifn0i=i+1endififN0j=j+1endifinput输入整数：ton________?i=,i?j=,jsettalkonreturn标准答案：0n0enddo;解答过程：(2)或n#0或n!=012.*题目:求1到50的累加和（S=1+2+3+...+50）并显示。请在_____处添上适当的内容，使程序完整。H=0I=1DOWHILE________H=H+I________ENDDO?HRETURN标准答案：i=50i=i+1;解答过程：(1)I=50或51I或50=I或I51(2)I=I+1或I=1+I或STORI+1TOI13.下面程序段是求Sum=1+2+3+…+50，根据已给程序内容填空，补充完成程序。CLEARSum=0i=1DOWHILE________________i=i+1ENDDO?“Sum=”,SumRETURN标准答案：i=50sum=sum+i;解答过程：答案中以英文不区分大小写。14.下面程序段是判断从键盘上输入的一个自然数能否同时被2和3整除，若能则在屏幕上输出该数，若不能显示“此数不是2和3的倍数”，请把程序补充完整。CLEARINPUT请输入一个自然：TOnIF________？n,能同时被2和3整除________？n,不能同时被2和3整除ENDIFRETURN标准答案：n/2=INT(n/2)ANDn/3=INT(n/3)ELSE;解答过程：答案1:n%2=0ANDn%3=0或者MOD（n,2）=0ANDMOD（n,3）=0答案中英文不区分大小写。15.题目：下面程序根据XSDB.DBF数据表中的计算机和英语成绩对奖学金做相应调整双科90分以上（包括90）的每人增加30元；双科75分以上（包括75）的每人增加20元；其他人增加10元。USEXSDBDOWHILE________DOCASECASE计算机=90.AND.英语=90REPLACE奖学金WITH奖学金+30CASE计算机=75.AND.英语=75REPLACE奖学金WITH奖学金+20________REPLACE奖学金WITH奖学金+10ENDCASE________ENDDO标准答案：.not.eof()otherwiseuse;解答过程：16*题目：求出1到100之间的奇数积、偶数和。SETTALKOFF________s2=1FORI=1to100IFMOD(i,2)=________s1=s1+IElses2=________ENDIFNEXT?奇数积为:,s2?偶数和为:,s1SETTALKON标准答案：s1=00s2=s2*I;解答过程：(1)或STOR0TOs1(2)0(3)s2=s2*I或s2=I*s2或STORs2*ITOs217.题目:下面是计算1+3+5+…+99之和的程序。请在_____处添上适当的内容，使程序完整。SETTALKOFF________FORI=1TO99________S=S+IENDFOR?结果=,sRETURNSETTALKON标准答案：s=0step2;解答过程：(1)或Store0Tos