二级VF程序设计典型例题.docx

《二级VF程序设计典型例题.docx》由会员分享，可在线阅读，更多相关《二级VF程序设计典型例题.docx（26页珍藏版）》请在优知文库上搜索。

1、计算机二级VF程序设计典型例题(六)基础培训频道更新:2008-6-20编辑:站长阅读：RETURNT分析：FUNCTION是一个子函数，语句PARAMETERS是定义子函数里面的变量。例30假如说用DO吩咐来执行查询文件、菜单文件、那么文件名中必需名含。分析：V1.SUA1.FOXPRO程序文件通过编辑、连接，可以产生不同的目标代码文件，这些文件具有不同的文件名。当用Do吩咐执行程序文件时，假如没有指定扩展名，系统将按卜.列依次找寻程序文件的源代码或某种目标代码文件执行：.EXE-.APP-.FKP-.PRG;但是用DO吩咐来执行查询文件、菜单文件时，那么文件名中必需包括扩展名。答案：扩展名

2、(.QBR或.MPR)例31打开银行客户关系表，输入一个限制口令限制程序的执行，若口令为1,则把“银行代码”为“001”的全部记录加上删除标记:若口令为2,把“银行代码”为“002”的全部记录加上删除标记:若口令为3,把“银行代码”为“003”的全部记录加上删除标记。请将程序填写完整。程序:C1.EARUSE银行客户关系表EXC1.USIVEBROWSE1.ASTWATT请输入你的选择：(1-3)ToyhdmDOCASECASE (1)DE1.ETE1.1.FOR银行代码=“001”BROWSEA1.1.FOR银行代码=“001”RECA1.1.CASE (2)DE1.ETEA1.1.FOR银

3、行代码=“002”BROWSEA1.1.FOR银行代码=“002”RECA1.1.CASE (3)DE1.ETEA1.1.FOR银行代码=“003”BROWSEAM,FOR银行代码=“003”RECA1.1.ENDCASEBROWSEUSE分析：该程序执行时，依次推断语句中列出的条件，当遇到取值为真时就执行该条件下的语句序列。答案：(1)yhdm=1，(2)yhdm=2”,(3)yhdm=3”例32按银行帐号显示存款记录,假如该帐号不存在，则会显示空记录，请将该程序填写完整。程序：C1.EARUSEKH帐号=SPASE(5)10.4SY”请出入要查循学生的学号：”CET帐号READ计算机二级忏

4、程序设计典型例题(五)基础培训频道更新:2008-4-25编辑:站长阅读：RETURN计算圆面积的函数：FUNCTIONAREAPARAMETERSS=3.1415926*A*RETURN分析：该语句是实现对计算圆面积函数的调用,返回值赋给变量SMo这个程序所运用的是一个F1.定义函数，自定义函数和子程序的区分就是自定义函数必需返回一个函数值，而子程序没有这个限制。自定义函数的编辑方法和子程序的编辑方法相同，只是要把子程序文件名改为自定义函数名。须要留意的几点是：臼定义函数能以独立的文件存储,也可包含在调用程序中作为它的一部分。假如FUNCTION函数名缺省，这表示该函数是一个独立的文件。另外

5、，自定义函数不能与系统函数同名，也不能与内存变量同名。答案：SM=AREA(R)例26当变量I在奇偶之间变更时,求出下面程序的输出结果。程序：C1.EARI=ODOWHI1.EK1.OIFINT(I2)=I2?WENDIFI=I+1ENDDO分析：该程序应用的是循环和条件嵌套的结构。答案：W,T,T连续显示5次例27填空完成下列程序，仅接受输入Y和N的程序，否则程序结束。DOWHI1.E.T.WAIT”请输入Y/NTOASIFUPPER(AS)*Y*NDUPPER(AS)N(1)E1.SE(1)ENDIFENDDO分析：该例是一个条件循环,选用EXIT是强制推出循环条件，执行它能够马上跳出循环

6、，执行ENDDO后面的语句。选用1.oOP则是一种强制缩短循环的语句，其功能是终止本次循环体语句的执行，把限制转到循环结构的起先。答案：(I)EXIT,(2)1.OOP例28当变量X的值变更时，依次显示其结果，留意循环体内的1.OoP和EX1.T语句。程序：C1.EARX=3DOWHI1.E.T.X=X+1IFX=INT(X3)*3?xE1.SE1.OOPENDIFIFX1OEXITENDIFENDDORETURN分析：INT()是取整数函数假如循环体内有1.ooP吩咐，那么当晕到1.ooP时，就结束循环的本次执行，不再执行其后的语句，而是转回DOWHI1.E处重新推断条件。假如循环体包括EX

7、IT吩咐，那么当遇到EX1.T时，就结束该循环语句的执行，转去执行EW)DO后面的语句。通常1.OOP或EXIT出现在循环体内嵌套的选择语句时，依据条件来确定是1.OOP回去,还是EXrr出去。答案：依次显示为：6,9,12例29填空完成下列程序，求数肯定值的程序。INPTU请输入一个数：T0X?STR(X)+“它的肯定值是：+STR(f(X)FUNCTIONF(1)IFT=0T=TE1.SET=-TENDIF计算机二级VF程序设计典型例题(四)基础培训频道更新:2008-2-20编辑：站长阅读：答案：(1)DOWHI1.EN3,(2)ENDDO,(3)N=N1【例20用两种循环步长值来求1+

8、2+3+50的值,请将程序填写完整。程序一：S=OFOR_(1)S=S+NENDFOR?SRETURN程序二:S=OFOR_(2)S=S+NENDFOR?SRETURN分析:这是一个计数循环的例子,由以上两种方法可以看出,初值和终值的设定是随步长值不同而变更的，在程序一中，由于步长为1,所以省略了。缺省时，步长值默认为1答案：(I)N=ITO50,(2)N=50TO1STEP-1例21求30!,请将程序填写完整。程序：N=II=I*NN=N+1ENDDO?1分析：在进入循环前，必需组织好循环使累加器先赋初值勤，循环条件表达式中的限制变量也要依据不同状况赋初值，因为循环的次数是和条件表达式中的限

9、制变量所赋的初值亲密相关的。循环体包括了在循环体中的书写依次也与循环的初始赋值有关。读者可以考虑一下，假如给N赋上班,那么DOWHI1.E后面的条件表达式该怎么来写？答案：N=30例22为了解决在子程序和主程序之间可能会出现变量的重复运用吩咐,这样可以使主程序中的变量短暂在子程序中无效，而不变更它的值。分析;为了避开子程序和主程序之间变量带来的问题,可以使主程序中运用吩咐PRIVATE隐藏主程序中可能存在的变量，使得在子程序中短暂无效。该吩咐的语法格式是:PRIVATE内存变量表答案：Private内存变量表例23统计银行客房关系表中，银行代码为001,并且存款金额大于1500元的客房人数，请

10、将程序填写完整。程序：c1.earopen银行客户关系表exc1.usivebrowsea1.1for银行代码=001”counta1.1.tokhgototopnum=0for(1.)ifnum=num+1.endifskipendfor2,30say”银行代码为001,存款金额大于1500元的人数有：“num+”endifuse分析：在该例中，for语句运用了循环变量1限制操作，道德计算出了数据表中所含记录个数num,然后把它人微言轻循环变量的终值，使循环变量从1起先，多次加入循环变量步长，直到循环变量1大于num时才结束循环。答案：(1)I=Itokhstep1.,金额“1500”and

11、,银行代码=“001”例24下例是关于参数传递的程序，求出正确结果。程序：c1.earstore3toa,bstore2toc,ddotubwitha,b,c,d?bstore4tot2,t1.store1tot4,t3dotubwitht1.,t2,t3,t3?t4dotubwith6,6,3,b?bproceduretubPARAMETER,B,C,DB=A*A-4*C*f)DOCASECASEB0B=210CASEB=OB=100ENDCASERETURN分析：在程序起先对A,B赋值为3,对C,D赋值为2o然后把实参A、B、C、D传递赐予程序TUB,依据表达式B=A*A-4*c*D计算出

12、结果为-7,所以输出结果为120,同样，以下程序执行时，依据表达式的计算结果，输出依次为1和6。答案：结果显示在3行上，依欠为120,1,6例25依据输入的半和径值,计算圆的面积,请将程序填写完整。程序：C1.ERR=OSM=O12,15SAY“输入圆半径CETRREADIFR=OEXITENDIF16,16SAY“圆的面积为：+AUJRIM(STR(SM)ENDDO计算机二级VF程序设计典型例题(三)基础培训频道更新:2008-2-25编辑:站长阅读：答案：DO吩咐文件名例14有下列程序：PARAMETER,B,C,DD=B*B-4*A*CDOCASECASED=OCASED=10EXITE

13、NDIFENDDO?”S=m+STR(S,2)木程序的运行结果是分析：本程序是无限次循环程序，有N的值来确定何时停止循环。程序的功能是求1到10之间的全部整数之和。可得程序运行的结果为S=55答案：S=55例16有如下程序：*主程序：MAINePRGSETTA1.KOFFC1.EARS=ODOSUBWITH10,S?S*子程序SUB。PRGPARAMETERSD1.,D2D1=D1+D1D2=D1*2RETURN执行主程序后S的值是分析：DO.WITH语句中的实在参数除了可以是变量外，还可以是随意有数或表达式。当为常数时，干脆把值传给对应的形参；当为表达式时，先求其值后把其值传给形参。主程序中变量S的初值为0,S调用子程序SUB,将数值10和0对应传给子程序中的参数D1.和D2,执行D1=D1+D1后,D1.=20,再执行D2