资源描述：
《最终vfp调试题整理》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。
1、调试题：（1）判断是否为完数（2）求SINX的值（3）正方形的边长求周长、表面积、体积（4）各班男女奖学金的总额统计（5）质数因子连成式（6）判断表文件是否存在，并浏览（7）指定学生奖学金加10元（8）正整数M内的偶数和偶数和（9）X的次方求和（10）三个数从小到大排列（11）阿拉伯数字转换成中文大写数字（12）查找学生成绩并评定等级（13）工资汇总（14）判断闰年（15）数据型测试（16）计算平均值（17）阶乘（18）最大最小数码（19）弹出对话框（20）一元二次方程（21）显示表全部字段（22）
2、班级奖学金大写显示（23）翻译密码（24）素数（1）判断是否为完数要求：输出给定的正整数值表达式的值是否完数。完数是指该数的值刚好等于其所有质数因子相加（包括1）例如：6=1+2+3SETTALKOFFCLEARINPUT"M="TOMS=0&&______1Fori=1to(m-1)&&______2Ifmod(m,i)=0&&______3S=s+i&&______4ENDIFENDFORIfs=m&&______5?M,"是完数！"ELSE?M,"不是完数！"ENDIFSETTALKON（2）
3、求SINX的值要求：（1）求SINX的值。SINX=X-(X^3)/(3!)+(X^5)/(5!)-(X^7)/(7!)+……+((-1)^(N-1))*(X^(2*N-1)/((2*N-1!)(2)X从键盘输入，当上述算式的最后一项的值小于或等于10^（-5）时，结束运算。SETTALKOFFCLEARINPUT"X="TOXS=0STORE1TOT1,T2,IT3=-1&&_________1STORE1TOT1,T2FORJ=1TO2*I-1T1=&&_________2T2=&&______
4、___3T3=&&_________4ENDFOR&&________5I=I+1ENDDO?"SIN("+STR(X,6,4)+")="+LTRIM(STR(S,20,7))SETTALKON（3）正方形的边长求周长、表面积、体积要求：（1）从文本框中输入正方形的边长，利用选项组按钮确定输出值。界面如Modify.jpg所示。*****************************r=val(Thisform.Text1.Value)x1=Thisform.OptionGroup1.Valuex
5、2="正方体"if!empty(r)DoCaseCasex1=1Thisform.Label2.Caption=x2+"周长="+allt(Str(6*r))Casex1=2Thisform.Label2.Caption=x2+"表面积="+allt(Str(6*r*r))Casex1=3Thisform.Label2.Caption=x2+"体积="+allt(Str(r*r*r))EndcaseElseMessagebox("输入不能为空",48+0+0)Thisform.Text1.Setfo
6、cusEndifModify.jpg（4）各班男女奖学金的总额统计要求：显示输出“学生”表中每个班级的男女同学的奖学金总额。（学号字段的前三位代表班级）SETTALKOFFCLEARUSE学生INDEXON学号TOINN0?"**********各班男女奖学金总额统计************"?"班级男同学奖学金总额女同学奖学金总额"&&________1CLASS=LEFT(学号,3)&&________2DOWHILELEFT(学号,3)=CLASS&&________3BOYS=BOYS+奖学
7、金ELSE&&________4ENDIF&&_______5ENDDO?CLASS+STR(BOYS,19,2)+STR(GIRLS,19,2)ENDDOUSESETTALKON(5)质数因子连成式要求：输出正整数表达式（正整数由用户从键盘输入）的质数因子连成式。SETTALKOFFCLEAR&&________1S=STR(X,5)+"="P=0FORI=2TOX&&_________2P=1S=S+STR(I,3)+"*"X=X/I&&_________3I=I-1&&________4END
8、IFENDFOR&&__________5?LEFT(S,LEN(S)-1)ELSE?STR(X,5)+"没有因子！"ENDIFSETTALKON（6）判断表文件是否存在，并浏览要求：浏览指定的表文件内容，表文件名由用户从键盘输入，程序自动判断用户指定的表文件存在与否，存在则浏览，否则给出提示信息。SETTALKOFFDOWHILE.T.CLEARACCEPT"请输入表名（扩展名略）："TOTBNIFFILE("&TBN..DBF")&&_________1ELSEW
