《算法与程序设计》模拟测试卷（一）考试时间：90分钟满分：100分一、单项选择题（共20个空，每空2分，共40分）1．使用计算机解题的步骤，以下描述正确的是：( )。

A．正确理解题意→设计正确算法→寻找解题方法→编写程序→调试运行B．正确理解题意→寻找解题方法→设计正确算法→编写程序→调试运行C．正确理解题意→寻找解题方法→设计正确算法→调试运行→编写程序D．正确理解题意→寻找解题方法→设计正确算法→编写程序→调试运行2．下列算法展示了一台自动售货机一次售货的工作流程：步骤1：等待接收一枚硬币。

步骤2：若硬币面值不是0.1元、0.5元、1元，退回硬币。

步骤3：若投入货款达1.5元或以上，执行步骤4和5。

步骤4：售出一个口香糖。

步骤5：从接收货款中减去1.5元。

步骤6：退回余额。

下列关于这个算法说法正确的是（）。

A．上述算法采用自然语言表示B．这台自动售货机在任何情况下也不会售出口香糖C．上述算法属于顺序算法结构D．这台自动售货机只会在接受硬币达2元时才放出口香糖3．Visual Basic规定窗体文件的扩展名是( )。

A．.for B．.frm C．.vbp D．.bas 4．假设某一程序如下，则能触发该程序的事件是（）Private Sub command2_Click()Form1.Caption=“VB示例”End SubA．command2 B．click C．form1 D．caption5．下列结果为True的逻辑表达式是（）。

A．Not(3<8) B．(3<8)And(5>10) C．(3<8)And(5<10) D．(3>8)Or(5>10) 6．以下语句中正确的是( )。

A．Const var1 as integer=50000 B．Dim 888fl as StringC．x+y = 9 D．Dim d(1 to 500) As Double7．在VB中，添加一个标签，在工具箱中要单击控件是（）。

A ．B ．C ．D ．8．下列运算结果中，值最大的是 （ ）。

A ．3\4 B ．3/4 C ．4 mod 3 D ．3 mod 4 9．表达式abs(int(－3.4))*sqr(100)的值是（ ）。

A ．－340 B ．-34 C ．30 D ．4010．若i = 1，j = 9，则运行 Print i; "*"; j; "="; i *j 的结果是（ ）。

A ．1 * 9 = 9 B ．i *j = 9C ．i * j =i *jD ． 911．下列Visual Basic 程序段运行后，变量max 的值为（ ）。

a=5b=10 max=aIF b>max Then max =bA ．5B ．10C ．5和10D ．以上都不是12．下列四种描述中，符合以下程序的是（ ）。

for k=11 to 20x=inputbox(“请输入一个整数”) y =x^2 next print x,yA ．读入10个不同的x 值，只计算最后一个y 值，只输出最后一个x 、yB ．读入10个不同的x 值，计算10个不同的y 值，输出10个不同的x 、y 值C ．只读入一个x 值，进行10次相同的运算，输出10个相同的x 、y 值D ．读入10个不同的x 值，计算10个不同的y 值，只输出最后一个x 、y 值 13．下列程序段中可以输出整数1-5的是（ ）： A ．i = 1 Do While i > 5 i = i + 1 Print i Loop 14．执行下面程序段的结果是（ ）。

n=6for d=1 to nIf n mod d=0 thenprint d;end if next dA ．1 6B ．1 2 3C ．1 2 3 6D ．1 2 3 4 5 6 15．阅读下面的程序段：B ． i = 1 Do While i <= 5 i = i + 1 Print i LoopC ．i = 1 Do While i <= 5 Print i i = i + 1 LoopD ．i = 1 Do until i <= 5 Print i i = i + 1 Loopa=0For m=1 To 3For n=1 To ma=a+1NextNext执行上面的程序后，a 的值为( ) 。

A．3 B．5 C．6 D．916．关于模块化程序设计以下说法中错误的是（）。

A．模块化程序设计体现了“自顶而下、逐步求精”的程序设计的基本思想。

B．模块化程序设计主要通过过程和函数的定义和调用来实现。

C．模块化程序设计可以提高程序运行速度D．模块化程序设计有利于程序的阅读和修改17．有一组数，顺序是“4、7、8、1、9”，用选择排序法将这组数从小到大排序，第二次交换数据后的顺序是：( )。

A．1、4、7、8、9 B．1、4、8、7、9C．1、7、8、9、4 D．1、7、8、4、918．下列表述中不含递归现象的是（）。

A．站在两面平行的镜子中间照镜子，镜子中的影像成“像中像”B．定义自然数：0是自然数，比自然数大1的数是自然数C．乘法九九表D．“从前有个庙，庙里有个老和尚在给小和尚讲故事，老和尚说：‘从前有个庙，庙里有个老和尚在给小和尚讲故事，老和尚说：……’”19．要向已包含数据的文件data.txt 追加数据，正确的文件打开命令是( )。

A．open “data1.txt” for output as #1B．open “data1.txt” for input as #1C．open “data1.txt” for append as #5D．open “data1.txt” for write as #120．下面是一组有序的数组元素：现进行对分查找，查找joe要依次访问的是：（）A．geo kea kar joe B．geo car kar joeC．geo kar hoo joe D．geo hoo kar joe二、填空题：（共15个空，每空3分，共45分）21．编程计算s=1*2+3*4+5*6+7*8+9*10：Private Sub command1_Click()S=0For k=1 to 10 step （1）s= （2）+k* （3）Next kPrint sEnd sub22．有一古算术问题：“有100块瓦，用100匹马来驮。

大马1驮3，中马1驮2，小马2驮1。

问要大马、中马、小马各几匹？”Private Sub Command1_Click()Dim x, y, z As Integer ' x代表大马、y代表中马、z代表小马For x = 1 To （1）For y = 1 To （2）z = （3）If （4）ThenPrint x,y,zEnd IfNext yNext xEnd Sub23的程序和流程图，请根据流程图填写程序中空白处。

Private Sub Command1_Click()m = InputBox("输入第一个自然数")n = InputBox("输入第二个自然数")If m < n Thent = m（1）n = tend ifp = n * mr = m Mod nDo While （2）m = nn = r（3）LoopPrint p/n,nEnd Sub24．采用选择排序法，将随机产生的100以内的10个整数按由大到小的顺序排列。

Private Sub Command1 _Click()Dim s(10) as integer, dim max as integer, dim maxnum,m,.n,temp as integer Randomize '初始化随机数发生器For m=1 to 10S(m)= （1）' 随机产生的100以内的整数Next mFor m=1 to 10Max= S(m)Maxnum= （2）For n= （3）to 10If （4）Thenmax=s(n)maxnum= （5）End IfNext nTemp= s(m)S(m)=maxS(maxnum) =tempNext mFor m=1 To 10Print s(m)Next mEnd Sub三、阅读程序，写出运行后输出的结果（每题5分，共15分）25．Private Sub Command1_Click() dim x as single,y as stringx = Round(5.4)Select Case xCase 1 To 5y = mid(“welcome”,3,2)Case 6 To 10y = left(“welcome”,3)Case Elsey = right(“welcome”,3)End SelectPrint “you”+yEnd sub 26、Private Sub Command1_click()Dim x, y As Integerx = 5y = 0If x < 10 Theny = 10If x < 100 Theny = 100End IfElsey = 200End IfPrint yEnd Sub27．Private Sub Command1_click()Dim n, a As Integern = 6a = 0Do While n > 1a = 1DoPrint " * ";a = a + 1Loop Until a >= nPrintn = n - 1LoopEnd Sub选修模块“算法与程序设计”模拟测试题二参考答案一、单项选择题1．B 2．A 3．B 4．B 5．C 6．D 7．A 8．D 9．D 10．A 11．B 12．D 13．C 14．C 15．C 16．C 17．B 18．C 19．C 20．C二、填空题21．（1）2 （2）S （3）(k+1)22．（1）33 （2）50 （3）100-x-y （4）3*x+2*y+0.5*z=10023．（1）m=n （2）r<>0 （3）r = m Mod n24．（1）fix(rnd*100) （2）m （3）m+1 （4）s(n)>max （5）n三、阅读程序，写出运行后输出的结果25．youlc 26．100 27．***************。