一、选择题1、流程图是描述（）的常用方式。

A、程序B、算法C、数据结构D、计算规则2、下面不属于算法描述方式的是（）。

A、自然语言B、伪代码C、流程图D、机器语言3、以下运算符中运算优先级最高的是（）。

A、+B、^C、>=D、*4、某程序中三个连续语句如下：a=1 b=2 c=b+a 它属于（）A、顺序结构B、选择结构C、循环结构D、以上三种都不是5、穷举法的适用范围是（）A、一切问题B、解的个数极多的问题C、解的个数有限且可一一列举D、不适合设计算法6、在现实生活中，人工解题的过程一般分为（）A、理解分析问题→寻找解题方法→用工具计算→验证结果B、寻找解题方法→理解分析问题→用工具计算→验证结果C、用工具计算→验证结果→寻找解题方法→理解分析问题D、用工具计算→验证结果→理解分析问题→寻找解题方法7、下列关于算法的特征描述不正确的是（）A、有穷性：算法必须在有限步之内结束B、确定性：算法的每一步必须确切的定义C、输入：算法必须至少有一个输入D、输出：算法必须至少有一个输出8、下列哪一个不是用于程序设计的软件（）A、BASICB、C语言C、WordD、Pascal9、下列可以作为合作变量名的是（）A、a7B、7aC、a-3D、810、编程求1+2+3+........+1000的和，该题设计最适合使用的控制结构为（）。

A、顺序结构B、分支结构C、循环结构D、选择结构11、下列步骤不属于软件开发过程的是（）A、任务分析与系统设计B、软件的销售C、代码编写与测试D、软件测试与维护12．以下程序段运行时，语句k=k+1 执行的次数为（）次。

k=-10dok=k+1loop while（until）k=0A. 9B. 10C. 11D. 1213．已知x=6, y=5, 则以下运算结果为True 的是（）A．Not(x>y) B. (x<5)or(y>6) C. (x>=6)And(y>=5) D. Not(x>4)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=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、10D、918．在VB程序设计中交换变量x和y的值，应使用的赋值语句是（）A、t = x : y=x : y=tB、x=y : y=t : t=xC、x=y : y=xD、t=x : x=y : y=t19．下列程序执行后A、B的值是（）A = 5B = 6A =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、3023．VB语言中，下列各种基本数据类型说明符中表示整型数的是（）。

A、BooleanB、IntegerC、SingleD、String24．执行下列程序段后，变量x的值为（）。

x =3 : y = 77Do While x < Sqr ( y )x = x + 2LoopA、7B、8C、10D、925．下面是用VB编写的求1 + 1/2 + 1/3 +……+1/100和的程序，该程序循环终止时i 的值是多少？（）Private Sub Form_Activate( )Dim i As Integer , sum As Integersum = 0For i = 1 To 100sum = 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-3B、7C、a$D、text728、以下不属于算法基本特征的是（）。

A、可执行性B、确定性C、有穷性D、无限性29、用计算机程序解决问题时，调试程序和检测结果的目的是（）A、前者用于检查语法是否正确，后者检查能否按要求完成任务B、前者检查算法是否正确，后者检查是否有语法错误C、前者用于检查语法是否正确，后者检查是否有病毒D、两者无区别30、下面属于逻辑运算符的是（）A、orB、FalseC、TrueD、<>31、下列程序段运行后，变量max 的值为（）。

a = 5b = 10max = aIF b > max Then max = bA、5B、10C、5和10D、其他三项都不是32、以下属于程序的基本控制结构的是（）A、星形结构B、选择结构C、网络结构D、平行结构二、程序分析题1、Private Sub Form_Activate( )Dim a, b, c As Integera = 15:b = 60:c = 38If a < b Thenm = aElsem = bEnd IfIf m > c Thenm = cEnd IfPrint "M="; mEnd Sub运行结果:____M=15______2、Private Sub Form_Load( )Dim X As Integer, Y As IntegerText1.Text = ""X = 99: Y = 98: M = XIf X < Y ThenM = YEnd IfText1.Text = MEnd Sub运行结果:_____99________3、用程序实现函数：y=|x|Private Sub Form_Load( )Dim X AS Integer，Y AS IntergerText1.Text=””X=InputBox(“X=?”)if x>=0 thenY=XElseY=-XEnd IfText1.Text=YEnd Sub4、计算1+2+3+……+100的值。

Private Sub Form_Activate( )Dim i, s AS Integers=0For i=1 TO 100 step 2s= s+iNext iPrint “S=”; sEnd Sub5、计算1+3+5+……+99的值。

Private Sub Form_Activate( )Dim i, s AS Integers = 0for i =1 to Step 2s =Next iPrint “S=”;sEnd Sub6、分析程序，写出计算结果Private Sub Form_Activate()Dim i,S as integerS=1For i=1 to 4S=S*iNext iPrint “S=”;SEnd Sub运行结果:_____S=24_________7、计算1+1/2+……+1/50的值。

Private Sub Form_activate()Dim i,s as integers=0For i=1 to ___50 step 1______s=___s+1/i________Next iPrint “S=”;sEnd Sub8、分析程序，写出计算结果Private Sub Form_Activate()Dim I As Integer, S As IntegerS = 0For I = 2 To 6S = S + INext IPrint "S="; SEnd Sub运行结果:____ ___S=20___________9．p=1For i=1 to 5p=p+inext iprint “I,P 分别为：”; i,p输出：I，P 分别为：_6___,___16___10．Sum=0For i=1 To 100sum=sum+2Next iprint “Sum=”; sum输出：__ Sum=200________11．下面是1+1/2+1/3+…+1/100 的和的程序，该程序循环终止时i 的值是多少？（101 ）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__Print "*";Next jPrint__ Next i ______________14．执行下列程序段后，变量x 的值为：（9 ）x=3;y=77DO WHILE x<sqr(y)x=x+2LOOP15．p = 0: n = 5For I = 1 To np = p + I * 2If p >= 10 Then Exit ForNext IPrint p 答案：__12__16．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 integera=15b=60c=38if a<b then m=a else m=bIf m>c then m=cPrint “M=”;mEnd Sub 执行结果：______M=15________18、分析程序，写出执行结果(VB代码)Private Sub Form_Activate()Dim i,s as integers=0for i=2 to 6s=s+INext iPrint “S=”;sEnd Sub执行结果：____S=20_______三、程序部分大题：1. 题目中是一个求二次函数曲线顶点坐标的VB程序，在运行是Text1、Text2、Text3分别输入3、6、9三个数，请问Text4、Text5输出结果分别就应为多少？（每空4分，共8分）2. 下面是用VB编写的求1+1/2+1/3+……+1/100和的程序，在空缺部分填上相应的语句。