《算法和程序设计》模拟测试卷(一)含答案

《算法与程序设计》模拟测试卷（一）考试时间：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．VisualBasic规定窗体文件的扩展名是()。

A．.forB．.frmC．.vbpD．.bas4．假设某一程序如下，则能触发该程序的事件是（）PrivateSubcommand2_Click()

Form1.Caption=“VB示例”EndSubA．command2B．clickC．form1D．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．Constvar1asinteger=50000 B．Dim888flasStringC．x+y=9 D．Dimd(1to500)AsDouble7．在VB中，添加一个标签，在工具箱中要单击控件是（）。A．B．C．D．8．下列运算结果中，值最大的是（）。

A．3\4

B．3/4

C．4mod3

D．3mod4

9．表达式abs(int(－3.4))*sqr(100)的值是（）。A．－340B．-34C．30D．4010．若i=1，j=9，则运行Printi;"*";j;"=";i*j的结果是（）。A．1*9=9B．i*j=9 C．i*j=i*j D．911．下列Visual

Basic程序段运行后，变量max的值为（）。

a=5b=10max=a

IF

b>max

Then

max

=b

A．5

B．10

C．5和10

D．以上都不是12．下列四种描述中，符合以下程序的是（）。fork=11to20x=inputbox(“请输入一个整数”)y=x^2nextprintx,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值C．i=1DoWhilei<=5C．i=1DoWhilei<=5Printii=i+1LoopB．i=1DoWhilei<=5i=i+1PrintiLoop。D．i=1DoD．i=1Dountili<=5Printii=i+1LoopDoWhilei>5i=i+1PrintiLoop14．执行下面程序段的结果是（）。n=6ford=1tonIfnmodd=0thenprintd;endifnextdA．16 B．123 C．1236 D．12345615．阅读下面的程序段：

a=0Form=1To3

Forn=1Toma=a+1

NextNext

执行上面的程序后，a的值为()。

A．3B．5C．6D．16．关于模块化程序设计以下说法中错误的是（）。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”foroutputas#1B．open“data1.txt”forinputas#1C．open“data1.txt”forappendas#5D．open“data1.txt”forwriteas#120．下面是一组有序的数组元素：1234567891011121314allbrecarduaevefregeohenhoojoekarkeamaroli现进行对分查找，查找joe要依次访问的是：（）A．geokeakarjoe B．geocarkarjoeC．geokarhoojoe D．geohookarjoe二、填空题：（共15个空，每空3分，共45分）21．编程计算s=1*2+3*4+5*6+7*8+9*10：PrivateSubcommand1_Click()S=0Fork=1to10step（1）s=（2）+k*（3）NextkPrintsEndsub22．有一古算术问题：“有100块瓦，用100匹马来驮。大马1驮3，中马1驮2，小马2驮1。问要大马、中马、小马各几匹？”PrivateSubCommand1_Click()Dimx,y,zAsInteger'x代表大马、y代表中马、z代表小马Forx=1To（1）Fory=1To（2）z=（3）If（4）ThenPrintx,y,zEndIfNextyNextxEndSub开始开始p←m*n求m除以n的余数rm←nn←rr=0输出p/n、n结束m、n互换m>n?YNY输入两个自然数m、nN23．以下为用辗转相除法求两数的最小公倍数和最大公约数的程序和流程图，请根据流程图填写程序中空白处。PrivateSubCommand1_Click()m=InputBox("输入第一个自然数")n=InputBox("输入第二个自然数")Ifm<nThent=m（1）n=tendifp=n*mr=mModnDoWhile（2）

m=n

n=r

（3）LoopPrintp/n,nEndSub24．采用选择排序法，将随机产生的100以内的10个整数按由大到小的顺序排列。PrivateSubCommand1_Click()Dims(10)asinteger,dimmaxasinteger,dimmaxnum,m,.n,tempasintegerRandomize'初始化随机数发生器Form=1to10S(m)=（1）'随机产生的100以内的整数NextmForm=1to10Max=S(m)Maxnum=（2）Forn=（3）to10If（4）Thenmax=s(n)maxnum=（5）EndIfNextnTemp=s(m)S(m)=maxS(maxnum)=tempNextmForm=1To10Prints(m)NextmEndSub三、阅读程序，写出运行后输出的结果（每题5分，共15分）26、PrivateSubCommand1_click()

26、PrivateSubCommand1_click()

Dimx,yAsIntegerx=5y=0Ifx<10Theny=10Ifx<100Theny=100EndIfElsey=200EndIfPrintyEndSubdimxassingle,yasstringx=Round(5.4)SelectCasexCase1To5y=mid(“welcome”,3,2)Case6To10y=left(“welcome”,3)CaseElsey=right(“welcome”,3)EndSelectPrint“you”+yEndsub27．PrivateSubCommand1_click()Dimn,aAsIntegern=6a=0DoWhilen>1a=1DoPrint"*";a=a+1LoopUntila>=nPrintn=n-1LoopEndSub选修模块“算法与程序设计”模拟测试题二参考答案一、

单项选择题1．B2．A3．B4．B5．C6．D7．A8．D9．D10．A11．B12．D13．C14．C15．C16．C17．B