历年算法与程序设计学业水平考试真题带答案

一、选择题1、流程囱是描述（）的常用方式。A、程序 B、算法 C、数据结构 D、计算规则2、下面不属于算法描述方式的是（）。A、自然语言B、伪代码C、流程图D、机器语言3、以下运算符中运算优先级最高的是（）。A、A、+ B、人 C、4、某程序中三个连续语句如下：a=l b=2c=b+aA、顺序结构 B、选择结构5、穷举法的适用范围是（）A、一一切问题C、解的个数有限且可一一列举= D、*它属于（）C、循环结构D、以上三种都不是B、解的个数极多的问题、不适合设计算法6、在现实生活中，人工解题的过程一般分为（）A、理解分析问题一寻找解题方法一用工具计算一验证结果B、寻找解题方法一理解分析问题一用工具计算T验证结果C、用工具计算一脸证结果一寻找解题方法D、7C、用工具计算一脸证结果一寻找解题方法D、7、下列关于算法的特征描述不正确的是（）A、有穷性：算法必须在有限步之内结束定义C、输入：算法必须至少有一个输入8、下列哪一个不是用于程序设计的软件（）A、BASIC B、C语言 C、Word9、下列可以作为合作变量名的是（）A、a7 B、7a C>a-3理解分析问题用工具计算一验证结果一理解分析问题一寻找解题方法B、确定性：算法的每一步必须确切的D、输出：算法必须至少有一个输出D、PascalD、810、编程求1+2+3+........+1000的和，该题设计最适合使用的控制结构为（）。A、顺序结构 B、分支结构C、循环结构D、选择结构11、下列步骤不属于软件开发过程的是（）A、任务分析与系统设计 B、软件的销售C、代码编写与测试D、软件测试与维护.以下程序段运行时，语句k=k+l执行的次数为（）次。

k=-10loopwhile(until)k=()A.9k=-10loopwhile(until)k=()A.9B.1()C.11D.12.巳知x=6,y=5,则以下运算结果为True的是（A.Not(x>y)(x<5)or(y>6)C.(x>=6)And(y>=5) D.Not(x>4)A.Not(x>y)14.模块化程序设计方法反映了结构化程序设计的（）基本思想。A、自顶向下，逐步求精B、面向对象 C、自定义函数、过程D、可视化编程15、一位同学想编程解决“韩信点兵”的问题，他制定的如下工作过程中，最恰当的是（）A、设计算法，编写程序，提出问题，运行程序，得到答案B、分析问题，编写程序，设计算法，运行程序，得到答案C、分析问题，设计算法，编写程序，运行程序，得到答案D设计算法，提出问题，编写程序，运行程序，得到答案16、交换变量A和B,语句为（）

A.A=B;B=C;C=AB.C=A;A=B;B=CA.A=B;B=C;C=AB.C=A;A=B;B=CA=B;B=A D.C=A;B=A;B=C.执行下列程序段后，变量y的值为（）x=3:y=7DoWhilex<Sqr（y）x=x+2LoopA、7B、8C、1（）D、9.在VB程序设计中交换变量x和y的值，应使用的赋值语句是（）Ast=x:y=x:v=tB、x=y:v=t:t=xC^x=y:y=xD、t=x:x=y:v=t.下列程序执行后A、B的值是（）A=5B=6A=B:B=A:A=BA、5、A、5、6B、6、6C、6、5D、5、5.流程图中表示判断框的是()A、禺形框B、菱形框C、圆形框D、椭圆形框.以下描述中最适合用计算机编程来处理的是()。A、确定放学回家的路线B、计算某个同学期中考试各科成绩部分C、计算100以内的奇数平方和D、在因特网上查找自己喜欢的歌曲.下列程序执行后A、B的值是()。A=3()B=40A=A+B:B=A-B:A=A-BA、3()、40B、4()、40C、4。、3()D、3()、3().VB语言中，下列各种基本数据类型说明符中表示整型数的是()oAsBooleanB、IntegerC>Single D、String.执行下列程序段后，变量x的值为()。DoWhilex<Sqr(y)x=x+2LoopAs7B、8C、1()D、925.下面是用VB编写的求1+1/2+1/3+……+1/100和的程序，该程序循环终止时i的值是多少？()PrivateSubForm_Activatc()DimiAsInteger,sumAsIntegersum=0Fori=1To100sum=sum+1/iNextiPrint"sum=";sumEndSubA、i=102B、i=100C、i=101D、无法判断26、由语句：DimK（ll）AsLong,判断下列结论中错误的是（）。A、语句定义了数组K,它的下标是从0到11B、数组K共有12个分量C、数组K的各个分量都是长整型数D、数组K的各个分量的值将按从小到大的顺序自动排列27、下列是合法变量名的是：（）A、a-3 B、7C、a$D、tcxt728、以下不属于算法基本特征的是（）。A、可执行性 B、确定性C、有穷性D、无限性29、用计算机程序解决问题时，调试程序和检测结果的目的是（）A、前者用于检查语法是否正确，后者检查能否按要求完成任务B、前者检查算法是否正确，后者检查是否有语法错误C、前者用于检查语法是否正确，后者检查是否有病毒D、两者无区别30、下面属于逻辑运算符的是（）orB、FalseC、TrueD、<>31、下列程序段运行后，变量max的值为)ob=1()max=aIFb>maxThenmax=bA、5B、A、5B、1()C、5和10D、其他三项都不是32、以下属于程序的基本控制结构的是（A、星形结构BA、星形结构B、选择结构C、网络结构、平行结构二、程序分析题1、PrivateSubForm_Activatc()Dima,b,cAsIntegera=15:b=60:c=38Ifa<bThenElsem=bEndIfIfm>cThenm=cEndIfPrint"M=n;mEndSub运行结果:_M=152、PrivateSubForm_Load()DimXAsInteger,YAsIntegerTcxtl.Trxt="ux=99:Y=98:M=XJfX<YThenEndIfTcxtl.Tcxt=MEndSub运行结果:993、用程序实现函数：y=|x|PrivateSubForm_Load()DimXASInteger,YASIntergerTcxtl.Tcxt二"”X=lnputBox("X=?”)if♦>=()thenY=XElseY=-X EndIfTcxtl.Tcxt=YEndSub4、计算1+2+3+……+100的值。PrivateSubForm_Activatc()Dimi,sASIntegers=()Fori=lTO_J00 s= s+i NrxtiPrint"S=";sEndSub5、计算1+3+5+……+99的值。PrivateSubForm_Activatc()Dimi,sASIntegerfori=1to99Step2s=s+iNextiPrint"S="；sEndSub6、分析程序，写出计算结果PrivateSubForm_Activatc()Dimi,SasintegerS=1Fori=lto4S=S*iNextiPrint"S=”;SEndSub运行结果: S=24 7、计算1+1/2+……+1/50的值。PrivateSubForm_activatcQDimi,sasintegers=()Fori=lto5()step1s=—s+l/iNextiPrint“S二”;sEndSub8、分析程序，写出计算结果PrivateSubForm_Activatc()Dim1AsInteger,SAsIntegerS=()For1=2To6

Next)PrintnS=H;SEndSub运行结果:s=209.p=lFori=lto5p=p+inextiprint“1,P分别为：”；i,p输出：1,P分别为：_6—,一16.1().Sum=()Fori=lTo100sum=sum+2NextiprintSum二输出：—Sum=200.下面是1+1/2+1/3+--+1/10。的和的程序，该程序循环终止时i的值是多少？(101)sum=()Fori=lTo100sum=sum+l/inexti.a=l;b=()Dowhilea<=5b=b+a*aa=a+lLoopPrinta,b屏幕上显示的内容是：—6—,_55—.完善程序，打印如下图形********************For1=1To6Forj=1To_i_PrintNcxtjPrint_Nexti .执行下列程序段后，变量x的值为：(9 )x=3；y=77DOWHILEx<sqr(y)x=x+2LOOP15.p=0:n=5For1=1Tonp=p+1*2Ifp>=1()ThenExitForNextlPrintp 答案：一12.16.Ch="DEF”Fori=lto3ch=ch&mid(ch,i,l)NextiPrintch 答案：_DEFDEF17、分析程序，写出执行结果（VB代码）PrivateSubForm_Activatc()Dima,b,casintegera=15b=60c=38ifa<bthenm=aelsem=bIfm>cthenm=cPrint"M二";mEndSub执行结果： M=1518、分析程序，写出执行结果(VB代码)PrivateSubForm_Activatc()Dimi,sasintegers=()fori=2to6s=s+lNcxtiPrint“S二”;sEndSub执行结果：—S=20三、程序部分大题:.题目中是一个求二次函数曲线顶点坐标的VB程序，在运行是Tcxtl、Tcxt2、Tcxt3分别输入3、6、9三个数，请问Tcxt4、Tcxt5输出结果分别就应为多少？（每空4分，共8分）PrivateSubcOKanand1_c1ick()DimaAst已xt,bAstext,cAstexta=Vai(Textl.Text)b=Vai(Texti^Text)c=Vai(Text3.Text)in=-b/(2+a)n=(4*a*c-b+b)/4*aText4.Text二mText5.Text=nEndSubTest4输出结果为：T&st5输出结果为： -1,6.下面是用VB编写的求1+1/2+1/3+……+1/100和的程序，在空缺部分填上相应的语句。PrivateSubForm_ActivatcQDimiAsInteger,sumAsIntegersum=0Fori=1To100

sum=sum4-NcxtiPrintsum=sumEndSub1/i3、写出程序结果:PrivateSubsum=sum4-NcxtiPrintsum=sumEndSub1/i3、写出程序结果:PrivateSubForm_Activatc()DimchAsString,iAsIntegerDimch="DEF”Fori=1To3ch=ch&Mid(ch,i,1)NextiPrintchEndSub 答案：DEFDEF.表一是某种绘图软件的部分指令，如要根据表中的指令画出图一的图形，请根据分析填空:FORWARD4 FORWARD5LEFT120.写出程序结果：PrivateSubCommand1_ClickQDimpAsInteger,iAsInteger,nAsIntegerp=0:n=5Fori=lTonp=p+i*2Ifp>=10ThenExitForNextiPrintpEndSub答案： 12.填补程序：假设你从今年开始为“希望工程”存钱，今年存入100元钱，第二年存入200元钱，第三年存入300元钱……依此类推，问：20年时间你将为“希望工程”存入多少钱?PrivateSubCommand1_Click()Dimnasinteger,intsumasintegerintsum=0Forn=lto 20intsum=intsum+n*l00 nextnLblsum.caption=w两年共存入："&intsum&“元”EndSub.某快递公司规定：快件不超过1公斤的，快递费1。元，超过1公斤的部分，按每公斤5元计费，编写快递费计算程序(运费为S,重量为P)10 10+5*(P-l).写出程序结果：(8分，每空4分)PrivateSubForm_Activate()DimpAsInteger,iAsIntegerFori=1To5p=p+iNextiPrint“1P分别为：”；i,pEndSub输出结果：1P分别为：,616.PrivateSubCommandl_Click()DimaAsInteger,bAsIntegera=1:b=0DoWhilea<=5b=b+a*aa=a+1LoopPrinta,b

EndSub运行结果： 65510.小华从今年开始为“希望工程”存钱，计划今年存入100元钱，第二年存入200元钱,EndSub运行结果： 655第三年存入30。元钱……依此类推，问：20年时间你将为“希望工程”存入多少钱？sum+n*10011.补全流程图：编制VB程序，在界面上输入一个不为零的自然数，判断它是否是质数。（6分）12.写程序结果:Text2=“34”a=(Vai(Text2)-32)*5/2Printa答案：5四、算法题分析题：我们在用计算机解决问题时，常采用的算法有解析法、穷举法、递归法、冒泡排序法、选择排序法等，分析下列问题应采用哪种算法解决？1、求解“百鸡问题”