vfp复习程序.docx
- 文档编号:2890275
- 上传时间:2022-11-16
- 格式:DOCX
- 页数:15
- 大小:18.58KB
vfp复习程序.docx
《vfp复习程序.docx》由会员分享,可在线阅读,更多相关《vfp复习程序.docx(15页珍藏版)》请在冰豆网上搜索。
vfp复习程序
1、已有职工登记库ZGDJ.DBF,记录如下:
RECORD#XMXBZCJBGZHF
1王非女助教1500.T.
2刘华男工程师2500.F.
3周发男教授3000.T.
4李丽女讲师2200.F
请编写一程序,计算最大基本工资的值。
USEZGDJ
MAX=JBGZ
N=RECCOUNT
FORI=2TON
GOi
IFMAX _______________ ENDIF ENDFOR ? "MAX=",MAX A)MAX=JBGZB)SKIPC)REC=RECNO()D)MAX=2500 2、编写一程序,从键盘输入某职工工号并查找显示库文件AA.DBF(包含字段工号,年龄,工资)中该记录. CLEAR SETTALKOFF DOWHILE.T. ACCEPT"输入职工工号"TOBB USEAA LOCATEFOR_______ DISP IFBB=“00” EXIT ENDIF ENDDO RETU 二、运行程序题 1、本程序运行后,输出结果是() a=10c=d b=11a=c c=12endif d=13? a ifb>a A)10B)11C)12D)13 2、本程序是否有错 s=3.14*r*r r=6 ? "圆面积=",s 3、本程序是否有错。 r=6 s=3.14*r*h ? "圆面积=",s 4、运行下面程序,b值是多少? a=10 ifa>5 b=a endif ? b A)5B)10C)aD)b 5、运行下面程序,b值是多少? b=c otherwise b=5 endcase ? b a=30 b=20 c=10 docase casea<10 b=a casea>=10 A)30B)20C)10D)5 19.下面这个程序,如果程序执行了Loop语句,下一步执行哪一句() store0toi,s,t dowhilei<100 i=i+1 s=s+i ifint(i/2)=i/2 loop endif t=t+i enddo A)endifB)ifint(i/2)=i/2 C)store0toi,s,tD)dowhilei<100 21.下面这个程序,S的最终值是(),T的最终值是(),i的最终值是() store0toi,s,t dowhilei<100 i=i+1 s=s+i ifint(i/2)=i/2 loop endif t=t+i enddo A)1至100的累加和B)1至100的奇数和 C)1至100的偶数和D)100 42.在下列程序中填写适当的语句程序完整。 输入变量N,当N>0时,显示AAA.DBF的内容,当N<=0时,显示BBB.DBF的内容。 SETTALKOFF INPUTTON IFN>0 USEAAA LIST ELSE USEBBB LIST ENDIF _____ RETURN A)USEB)OPENC)MODIFILED)INDEXON 43.将变量N的值从0开始,逐次加2,加到98为止. SETTALKOFF N=0 DOWHILE.T. IFN>=98 _____ ENDIF N=N+2 ENDDO ? "N="+STR(N,3) RETURN A)LOOPB)EXITC)ENDDOD)EOF 44.任意输入20个数,找出最大数和最小数. SETTALKOFF INPUTTOX MA=X MI=X N=1 DOWHILEN<=20 _____TOX IFMA MA=X ELSE IFMI>X MI=X ENDIF ENDIF N=N+1 ENDDO ? MA,MI RETU A)INPUTB)ACCEPTC)WAITD)FIELDS 45.写出下面程序在键盘输入1234时的运行的结果。 Clear Input“a=”toa P=str(a) B=len(p) Pp=”” Fori=1tob P1=substr(p,I,1) Pp=p1+pp Endfor ? pp 46.补充下列程序实现下图所示的结果。 SETTALKOFF CLEAR* DOWHILEI<5*** J=1***** DOWHILE______******* @I,27-I+JSAY"*" J=J+1 ENDDO I=I+1 ENDDO SETTALKON RETU A)J<=1B)J=1C)J=2*1D)J<=2*I-1 48.SETTALKOFF STORE0TOX,Y DOWHILE.T. X=X+1 Y=Y+X IFX>=5 EXIT ENDIF ENDDO ? X,Y RETURN 程序运算结果是_______ A)515B)325C)520D)X>=20 49.本程序是求N! (N的阶乘)的值,留有一句未写,请选择一个答案。 SETTALKOFF ______ FORY=1TON P=P*Y ENDFOR RETU A)P=P*XB)P=1C)Y=1D)Y=0 50.当X取值不同时,求Y的值,并完成如下程序。 Y=X+5当8<=X<=16 Y=X*(X+2)+8当X>16 SETTALKOFF INPUTTOX Y=IIF(X<8,"无意义",IIF(_____,X+5,X*(X+2)+8)) ? Y SETTALKON RETU A)X<=8.AND.X>=16B)X>=8.AND.X>=16 C)X>=8.AND.X<=16D)X>=8.OR.X<=16 51.现有两程序A.PRG,B.PRG,试分析执行后显示的内容。 *A.PRG M=1 N=2 DOB ? "M=",M,"N=",N RETURN *B.PRG PRIVATEM M=3 N=4 RETURN 执行DOA后,显示M=1,N=_________。 A)2B)7C)4D)3 53.试写出程序执行后的结果: SETTALKOFF STORE0TOM FORN=1TO8 M=M+N ENDFOR ? "M=",M 结果为__________. A)36B)35C)30D)26 54.下列程序运行结果是: () settalkoff clear store0tom,n dowhilem<=10 m=m+1 ifmod(m,2)=1 loop else n=n+m endif enddo ? "n=",n return A)29B)31C)30D)32 55.本程序的功能是计算并输出7! (7的阶乘)的值,留有一句未写,请选择一个答案,使程序完整。 SETTALKOFF CLEAR N=1 K=1 DOWHILEN<=7 K=N*K N=__________ ENDDO ? "K=",K A)N+1B)N+LC)N+3D)N+2 60.SETTALKOFF CLEAR X=0 I=1 DOWHILEI<=10 X=X+1 I=I+1 ENDDO ? X SETTALKON 运行结果为: ____________. A)9B)10C)11D)1 三、判断题(34题) 8.下面一段程序,输出的X值为5 m=5 x="m" ? x 9.下面一段程序,输出的X值为5 m=5 x="m" ? &x 11.下一段程序运行后,输出X的值是10 clea x=10 doaawithx ? "x=",x return procedureaa parametersbb bb=20 return 12.下一段程序运行后,Y值为2。 x=8 y=int(x/3) ? y 13.下列程序运行后,a的值是12.57。 clea a=0 dobwith2,a ? a return procedureb parameterc,d d=c*c*pi() return 18.循环一定要有出口,否则就是死循环。 下面这个程序不是死循环。 clea a=1 dowhilea>0 b=2*a ifb<3 ? b loop endif enddo 31.if4=4and5>2+3 x="T" else x="F" endif X的输出值是T 32.下列程序的输出结果是不是AAA if2*4>=9 ? "AAA" else ? "BBB" endif 33.下面这段程序的结构是循环结构。 当前月份=month(date()) docase caseinlist(当前月份,3,4,5) 季节="春" caseinlist(当前月份,6,7,8) 季节="夏" caseinlist(当前月份,9,10,11) 季节="秋" caseinlist(当前月份,12,1,2) 季节="冬" otherwise ? "不可能" endcase 34.下面这段程序的结构是顺序结构 clea s=0 fori=1to100 s=s+i ? "s=",s endfor 四、程序题填空题 1.阅读下列程序: STORE0TOX,Y DOWHILE.T. X=X+1 Y=Y+X IFX>=4 EXIT ENDIF ENDDO ? "Y="+STR(Y,2) 这个程序执行后结果是_______。 2.以下是从键盘输入10个实数,统计其中最大数的程序: SETTALKOFF K=1 INPUT“请输入第一个数: ”TOX Y=X DOWHILEK<=_______ INPUT"请输入下一个数: "TOX IFY Y=X ENDIF K=K+1 ENDDO ? "最大数=",Y SETTALKON RETU 3.在当前盘当前目录下有一命令文件AA.PRG和MAIN.PRG,其内容如
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vfp 复习 程序