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

1、、选择题1、流程图是描述（）的常用方式。2、 下面不属于算法描述方式的是（）。3、以下运算符中运算优先级最高的是（A、+B、A4、某程序中三个连续语句如下：a=1b=2c=b+aA、顺序结构B、选择结构5、穷举法的适用范围是（）A、一切问题C、解的个数有限且可一一列举6、在现实生活中，人工解题的过程）。C、 =D、 *它属于（）C、 循环结构D、以上三种都不是B、解的个数极多的问题D、不适合设计算法般分为（A、理解分析问题t寻找解题方法t用工具计算t验证结果B、寻找解题方法t理解分析问题t用工具计算t验证结果C、用工具计算T验证结果T寻找解题方法T理解分析问题D、用工具计算t验证结果T理解分析

2、问题T寻找解题方法7、下列关于算法的特征描述不正确的是（）A、有穷性：算法必须在有限步之内结束C、输入：算法必须至少有一个输入8下列哪一个不是用于程序设计的软件（）B、确定性：算法的每一步必须确切的定义D、输出：算法必须至少有一个输出D、PascalD、8A、BASICB、C 语言C、Word9、下列可以作为合作变量名的是（）A、a7B、7aC、a-310、 编程求1+2+3+1000的和，该题设计最适合使用的控制结构为（）。A、顺序结构B、分支结构C、循环结构D、选择结构11、下列步骤不属于软件开发过程的是（）A、任务分析与系统设计B、软件的销售C、代码编写与测试D、软件测试与维护12 以下

3、程序段运行时，语句k=k+1执行的次数为（）次。k=-10dok=k+1|loop while (until)k=0A. 9 B. 10C.11 D.1213.已知x=6, y=5,则以下运算结果为True的是（）A . Not（xy） B. （x6） C. （x=6）And（y=5） D. Not（x4）14 模块化程序设计方法反映了结构化程序设计的（）基本思想。A、自顶向下，逐步求精B、面向对象C、自定义函数、过程D、可视化编程15、一位同学想编程解决韩信点兵”的问题，他制定的如下工作过程中，最恰当的是（）A、设计算法，编写程序，提出问题，运行程序，得到答案B分析问题，编写程序，设计算法，

4、运行程序，得到答案C分析问题，设计算法，编写程序，运行程序，得到答 案D设计算法，提出问题，编写程序，运行程序，得到答案16、交换变量 A 和 B, 语句为 （ ）A. A=B;B=C;C=A B. C=A;A=B;B=CC. A=B;B=AD. C=A;B=A;B=C17执行下列程序段后，变量y 的值为（ ）x=3 : y=7Do While x Sqr（y）x = x + 2LoopA、7B、8C、10 D、 918在 VB 程序设计中交换变量 x 和 y 的值，应使用的赋值语句是（ ）A、t = x : y=x : y=tB、x=y : y=t : t=xC、x=y : y=xD、t=x

5、 : x=y : y=t19下列程序执行后 A 、B 的值是（ ）A = 5B = 6 A = B : B = A : A = BA、 5、6B、6、6C、6、5D、5、520流程图中表示判断框的是（）A、钜形框B、菱形框C、圆形框D、椭圆形框21以下描述中最适合用计算机编程来处理的是（）。A、确定放学回家的路线B、计算某个同学期中考试各科成绩部分C、计算100以内的奇数平方和D 、在因特网上查找自己喜欢的歌曲 22下列程序执行后 A、 B 的值是（ ）。A=30B=40A=A+B ：B=A-B ： A=A-BA 、 30、 40B、 40、 40C、 40、 30D、 30、 3023VB

6、语言中，下列各种基本数据类型说明符中表示整型数的是（）。A 、 BooleanB 、 IntegerC、 SingleD 、 String24执行下列程序段后，变量x 的值为（ ）。x =3 : y = 77Do While x Sqr （ y ）x = x + 2LoopA、 7B、 8C、 10 D、 925. 下面是用 VB编写的求1 + 1/2 + 1/3 +1/1和的程序，该程序循环终止时i的值是多少?（）Private Sub Form_Activate（ ） Dim i As Integer , sum As Integersum = 0For i = 1 To 100sum =

7、 sum + 1/iNext iPrint “ sum = “ ; sumEnd SubA、i = 102B、i = 100C、i = 101D、无法判断26、 由语句：Dim K（11） As Long,判断下列结论中错误的是（）。A、语句定义了数组 K，它的下标是从0到11B 、数组 K 共有 12 个分量C、数组K的各个分量都是长整型数D、数组K的各个分量的值将按从小到大的顺序自动排列27、 下列是合法变量名的是：（ ）A 、 a-3 B 、 7C、 a$ D 、 text728、 以下不属于算法基本特征的是（）。A、可执行性B、确定性C、有穷性D、无限性29、 用计算机程序解决问题时,

8、调试程序和检测结果的目的是（）A、前者用于检查语法是否正确，后者检查能否按要求完成任务B、前者检查算法是否正确，后者检查是否有语法错误C、前者用于检查语法是否正确，后者检查是否有病毒D 、两者无区别30、下面属于逻辑运算符的是（）C、TrueD 、 A、 orB、False31 、下列程序段运行后,变量max的值为 （）。a = 5b = 10max = aIF b maxThenmax =bA、 5B、 10C、5和10D、其他三项都不是32、以下属于程序的基本控制结构的是（）A、星形结构B、选择结构C、网络结构D、平行结构二、程序分析题1 、 Private Sub Form_Activa

9、te( ) Dim a, b, c As Integer a = 15: b = 60: c = 38 If a c The nm = cEnd IfPrin t M=; mEnd Sub运行结果：M=15 2、Private Sub Form_Load()Dim XAs In teger, Y As In tegerTextl.Text =X = 99: Y = 98: M = XIf X =0 the nY=XElse_ Y=-XEnd IfText1.Text=YEnd Sub4、计算1+2+3+100的值。Private Sub Form_Activate() Dim i, s AS

10、In teger s=0For i=1 TO _100 s= s+iNext iPrintS=”；sEnd Sub5、计算1+3+5+99的值。Private Sub Form_Activate() Dim i, s AS In teger s = 0for i =1 to 99_ Step 2s = s+ijNext iPrintS=”sEnd Sub6、分析程序，写出计算结果Private Sub Form_Activate()Dim i,S as in tegerS=1For i=1 to 4S=S*iNext iPrint“ S=” ;SEnd Sub运行结果：S=247、计算1 +

11、1/2+1/5 0的值。Private Sub Form_activate()Dim i,s as in tegers=0For i=1 to50 step 1s=s+1/iNext iPrint“ S=” ;sEnd Sub8分析程序，写出计算结果Private Sub Form_Activate()Dim I As In teger, S As In teger S = 0For I = 2 To 6S = S + INext IPrin t S=; SEnd Sub运行结果：S=209. p=1For i=1 to 5p=p+inext iprint“；P 分别为：” ;i,p输出：I,

12、 P分别为：_6,1610. Sum=0For i=1 To 100sum=sum+2Next iprint“ Sum= ; sum输出：_ Sum=200i的值是多少？（101 )11. 下面是1+1/2+1/3+1/100的和的程序，该程序循环终止时sum=0For i=1 To 100sum=sum+1/inext i12. a=1;b=0Do while a=5b=b+a*aa=a+1LoopPrint a, b屏幕上显示的内容是：_6_ , _55_13. 完善程序，打印如下图形*For I = 1 To 6For j = 1 To_i_ Prin t *;Next jPrintNe

13、xt i14. 执行下列程序段后，变量x的值为：（9）x=3;y=77DO WHILE x= 10 Then Exit ForNext IPrint p答案：_1216.Ch=”DEF”For i=1 to 3ch=ch & mid(ch,i,1)Next iPrint ch答案：_ DEF DEF _17、分析程序，写出执行结果(VB代码)Private Sub Form_Activate()Dim a,b,c as in tegera=15b=60c=38if ac the n m=cPrint M= ”;mEnd Sub 执行结果： M=15 18、分析程序，写出执行结果(VB代码)Pr

14、ivate Sub Form_Activate()Dim i,s as in teger s=0for i=2 to 6s=s+lNext iPrint S=”sEnd Sub执行结果：S=201. 题目中是一个求二次函数曲线顶点坐标的VB程序，在运行是Textl、Text2、Text3分别输入3、6、9三个数，请问Text4、Text5输出结果分别就应为多少？（每空 4分，共8分）Private Sub coimandl_click0Dim a As text, b As tq 辰 text = Yal Textl, Text)b 二 7al (TestTezt)c 二 Vai (Text3

15、, Text)m = -b / (2 * a)n = (4 * a* c - I7 * b) / 4 *Tezt4. Text二 IDTeztS. Teitt=XLEnd SubTest4输出结果为:Test 5岀结杲为:-1,62. 下面是用VB编写的求1 + 1/2+1/3+1/100和的程序，在空缺部分填上相应的语句。Private Sub Form_Activate()Dim i As In teger, sum As In tegersum = 0For i = 1 To 100sum = sum +Next iPrint“ sum=” sumEnd Sub1/i3、写出程序结果：P

16、rivate Sub Form_Activate()Dim ch As String, i As In tegerch =“ DEF”For i = 1 To 3ch = ch & Mid (ch, i, 1 )Next iPrint chEnd Sub答案：DEFDEF 4表一是某种绘图软件的部分指令，如要根据表中的指令画出图一的图形，请根据分析填空:蜡4痂FDBffAED aIH t左轉t度REGHI t右转十度FORWARD 3KIGHT 90RIGHT 120FORVTAKL 4FORWARD 5LEFT 150RIG町 150FORVAKD 3FORWARD 4FORWARD 5 L

17、EFT 1205.写出程序结果:Private SubComma nd1_Click()Dim p p=0 : n=5For i=1As In teger.To np=p+i*2IfNextp=10 TheniPrinti AsIn teger,n As In tegerExitForEnd Sub答案：126.填补程序：假设你从今年开始为“希望工程”存钱，20年时间你将为“希望工程”存入多少钱?今年存入100元钱,第二年存入200元钱,第三年存入300元钱依此类推，问:Private SubDim nComma nd1_Click() as in teger, in tsumas in te

18、gerin tsum=0For n=1to20in tsum=in tsum+n*100n ext nLb1sum.caption= 两年共存入：” & intsum & 元 End Sub7. 某快递公司规定：快件不超过1公斤的，快递费10元，超过1公斤的部分，按每公斤 5元计费,编写快递费计算程序（运费为S，重量为P）1010+5*(P-1)8. 写出程序结果：(8分，每空4分)Private Sub Form_Activate()Dim p As In teger, i As In tegerp = 1For i = 1 To 5P = P + iNext iPrint “I P 分别为：” ；i, pEnd Sub输出结果：I P分别为：， 6