资源描述：
《vfp 二级 上机习题》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、VFP等级考试上机测试题及解答注：由于时间关系，这里是把大部分题型进行解答，可能有个别题型没涉及到，如有同学发现新题型不会操作的请向任课教师请教。一、程序填空：(要求在指定位置填上正确内容，注意：原有下划线和数字一定要清除掉！。)1.输出正整数表达式（正整数有用户从键盘输入）的质数因子连乖式。SETTALKOFFCLEARINPUT"X="TOX&&________1S=STR(X,5)+"="P=0FORI=2TOXIFX%I=0&&_________2P=1S=S+STR(I,3)+"*"X=INT(X/I)&&_________3
2、I=I-1LOOP&&________4ENDIFENDFORIFP<>0&&__________5?LEFT(S,LEN(S)-1)ELSE?STR(X,5)+"没有因子！"ENDIFSETTALKON2.输出M（从键盘给定的实数）输出它的整数位数、小数位数及其该数的整体输出位数。ZS=INT(ABS(X))ZSW=0DOWHILEZS>0ZS=INT(ZS/10)&&_________1ZSW=ZSW+1&&_________2ENDDOXSW=0DOWHILEINT(X)#XX=X*10&&_________3XSW=XSW+1&
3、&_________4ENDDOFJW=IIF(X<0,1,0)+IIF(XSW=0,0,1)?"整数位数为:"+STR(ZSW,5)+",小数位数为:"+STR(XSW,5)?"该数的实际输出位数为:"+STR(ZSW+XSW+1,5)&&___________5SETTALKON1.从键盘输入学生学号，在“成绩”表中计算该生平均成绩，并说明成绩的档次，如不在表中则提示相应信息。教材P118例3。7)SETTALKOFFCLEARUSE成绩ACCEPT"请输入学生的学号："TOXHLOCATEFOR学号=XH&&__________1
4、IF!FOUND()?"查无此人!"ELSEAVERAGE成绩TOCJFOR学号=XH&&_________2DOCASECASECJ>=90DC="优"CASECJ>=80DC="良"CASECJ>=70DC="中"CASECJ>=60DC="及格"OTHERWISE&&__________3DC="不及格"ENDCASE&&__________4?XH,CJ,DCENDIF&&_________5USESETTALKON2.计算（M！+N！）/（（M-N）！+M^N+M^M）的值。M、N从键盘输入。SETTALKOFFCLEARIN
5、PUT"M="TOMINPUT"N="TONSM=MDOJCWITHSMSN=NDOJCWITHSNSMN=M-NDOJCWITHSMNCMN=NDOMCWITHM,CMNDOMCWITHM,M&&__________1?(SM+SN)/(SMN+CMN+M)SETTALKONPROCJCPARAX&&__________2T=1FORI=1TOXT=T*IENDFORX=T&&__________3RETURNPROCMCPARAX,Y&&____________4T=1FORJ=1TOYT=T*XENDFORY=T&&_______
6、__5RETURN1.从键盘输入口令，有三次机会，验证。SETTALKOFFCLEARC=""FORI=1TO3&&1ACCEPTC+"请输入口令:"TOPSWIFALLTRIM(PSW)=="manager"&&2注：这个口令应该是题中给定的口令！?"欢迎使用本系统!"EXIT&&3ENDIFC="口令输入错误，再试一次！"ENDFOR&&4IFI=4&&5?"对不起，你无权使用本系统"ENDIFSETTALKON2.输出1~M（从键盘给定的正整数）中可由二个相等素数相加而成的数及其这种数的计数个数。SETTALKOFFCLEARIN
7、PUT"M="TOMFORII=3TOM/2&&_______1IFSS(II)&&_______2?STR(II*2,3)+"="+STR(II,3)+"+"+STR(II,3)ENDIFENDFORSETTALKONFUNCSSPARAXFORI=2TOX-1IFX%I=0&&_________3EXIT&&_________4ENDIFENDFORIFI=X&&________5RETURN.T.ELSERETURN.F.ENDIF1.输出素数及素数计数。输出1~M（从键盘输入）中素数及素数计数。SETTALKOFFCLEARIN
8、PUT"M="TOMS=0&&________1FORI=MTO1STEP-1IFSS(I)&&_______2S=S+1??STR(I,5)ENDIFENDFOR&&_______3?STR(S,5)SE
