算法与程序设计模拟试卷

模拟试卷（一）A．算法与程序设计一、选择题：本大题13小题，每小题2分，共26分。在每小题给出的四个选项中，只有一个是符合题目要求的。1．我们在编写程序的时候，不能用来表示变量名的标识符是（）A．printB．prin110ttextC．he_ll_oD．you5202．将数学表达式写成VB表达式，正确的是()A．log(x)/2a+b B．log(x)/2*a+b C．log(x)/(2a+b) D．log(x)/(2*a+b)3．表达式Mid("2012sanxianggaokao",1,4)的值是A．2012B．"2012" C．2D．"2"4．表达式2*3^2+2*8/4+3^2的值为（）。A．64B．31C．49D．225．在VB数组说明语句Dima(-3to3)Assingle中，数组a的元素说明正确的是（）A．有6个单精度实数型元素B．有7个单精度实数型元素C．有6个长整数型元素D．有7个双精度实数型元素6．在程序中需要将两个变量的值交换，以下四段流程图中，（）不能完成将变量X、Y的值互相交换。A．B．C．D．7．下列VB程序段DimxAsSingle,yAsSinglex=Val(Text1.Text)７．找出表示问题的前提条件与结果之间关系的数学表达式，并通过表达式的计算来实现问题求解，这种方法叫做()A．递推法B．枚举法C．选择法D．解析法8．如果要改变窗体的标题，则需要设置的属性是()A．CaptionB．Name C．BackColor D．Text9．在VisualBasic的可视化程序设计环境，可以生成能在Windows环境中直接运行的文件，其文件的扩展名为（）A．frm B．exe C．vbw D．vbp10．我国是人口大国，2007年初，我国人口总数p已达13亿5千万。假设我国年人口增长率r为0.5%，则从2007年起多少年后我国人口就会达到或超过15亿？解决此问题算法部分流程图如下图所示：今年人口今年人口p←13.5空白矩形框中应填入的是()A．p←p(1+r) B．p←p+r C．p←pr D．p←p(1+n)11．某VB程序的一个事件过程如下：PrivateSubCommand1_Click()DimiAsInteger,sAsIntegers=1:i=1DoWhilei<10i=i+1s=s*iLoopText1.Text=Str(s)EndSub程序运行时，单击命令按钮Command1后弹出如图所示的错误信息。出现错误的原因是A．Str函数计算时出现错误 B．s=s*i计算时出现错误C．界面上缺少文本框Text1 D．变量s类型定义错误12．下面程序段运行后，变量T的值为（）T=1K=1DoWhileK<=5T=T*KK=K+2LoopA．3B．15C．120D．6013．在下面的程序段中其中d(j)>d(j–1)所在的句子执行的次数为()ForI=1To5Forj=6ToI+1Step-1Ifd(j)>d(j-1)Thent=d(j):d(j)=d(j-1):d(j-1)=tEndIfNextjNextIA．5B．6 C．15 D．30二、综合题：本大题5小题，其中第14题２分，第15题３分，第16题4分，第17题5分，第18题5分，共19分。14.下面的程序执行时在text1文本框输入一个数鼠标点击按键后，在text2文本框显示相应的数。PrivateSubCommand1_Click()DimkAsLongk=Val(Text1.Text)Text2.Text=Str(k*2)EndSub当你从text1文本输入3.21，则在text2文本框显示的值是。15．有如下VisualBasic程序段：PrivateSubCommand1_Click()DimiAsInteger,sAsIntegers=0i=1a=2DoWhilei<=100s=s+a*ii=i*5LoopText1.Text=Str(s)Text2.Text=Str(i)EndSub问：单击命令按钮Command1后：（1）文本框Text1中显示的内容是____________。（2）文本框Text2中显示的内容是____________。16.下面程序（界面如图）的功能是：将0到255之间的十进制整数转换为二进制整数的表示形式。在如图中上面的文本框（Text1）中输入一个0到255之间的十进制整数，单击“转换”按钮，该十进制整数的二进制形式会显示在下面的文本框（Text2）中。为了实现这一目标，程序中划线处的语句应为_____________.PrivateSubCommand1_Click()DimaAsIntegerDimsAsStringDimiAsIntegerDimc(1To8)AsIntegera=val(Text1.Text)If_____ThenText2.Text="输入数据错误，请重新输入！"ElseFori=1To8c(i)=aMod2a=______________s=Str(c(i))+sNextiText2.Text=sEndIfEndSub17.个位数字是6，且能被3整除的3位数共有多少个？（设共有n个这样的数）（1）下面程序用于解决这一问题，在划线处填入合适的语句或表达式；（2）流程图中所采用的算法名称是。第17题流程图第17题流程图VB程序如下：SubCommand1_Click()DimiAsInteger,nAsIntegerm=106n=_______DoWhilem<=996If_______Thenn=n+1m=___LoopText1.Text=Str(n)EndSub18．小新写了一个VB应用程序实现功能如下：在列表框list1中显示一批用户输入的数据数据（不超过500个），当点击命令按钮commond1后，将输入的数据按大小顺序在列表框list2中显示出来，请回答下列问题;(1)虚线框内程序段所采用的排序算法名称是________.(2)在划线处填入合适的代码.Dimd(1To500)AsDoubleDimnAsIntegerSubCommond2_Click()Text1.Text="":n=0List1.Clear:List2.ClearEndSubSubText1_KeyPress(KeyAsciiAsInteger)IfKeyAscii=13ThenIfn<500Thenn=n+1d(n)=Val(Text1.Text)List1.addItemText1.textText1.Text=""EndIfEndIfEndSubSubCommand1_Click()Dimi,j,mAsIntegerDimkAs____①______Fori=1Ton-1Fori=1Ton-1m=iForj=i+1TonIfd(m)>d(j)Thenm=jNextjk=d(i):d(i)=d(m):d(m)=kNextiList2.ClearFori=1To__②___List2.AddItemStr(d(i))NextiEndsub参考答案一、选择题：本大题13小题，每小题2分，共26分。在每小题给出的四个选项中，只有一个是符合题目要求的。1．答案：A简析：print是VB保留字，不可以作变量名2．答案：D简析：分母里的表达式用括号3．答案：B简析：mid(x,n,k)函数从字符串x中第n个字符开始为k的子字符串4．答案：B简析：先算乘除后算加减5．答案：B简析：-3与3之间有个06．答案：C简析：y的值发生了改变7．答案：D简析：解析算法：用解析的方法找出表示问题的前提条件与所求结果之间关系的数学表达式，并通过表达式的计算来实现问题的求解8．答案：B简析：窗体标题属性是name9．答案：B简析：VB应用程序在运行和保存时涉及到三类文件，其文件扩展名分别是窗体文件（.frm）、工程文件（.vbp）、可执行文件（.exe）10．答案：A简析：增长率r，下一年应该是p=p*(1+r)11．答案：D简析：图”溢出”，说明有变量溢出，分析可知本题是求10！故s应该为long12．答案：B简析：K运行了1、3、5一共3次，T=1*3*5=1513．答案：C简析：用冒泡排序法对n个数进行排序时，共需比较次二、综合题：本大题5小题，其中第14题２分，第15题３分，第16题4分，第17题5分，第18题5分，共19分。14．答案：text2文本框显示的值6简析：因为,val()函数字符串转成数值,而k是Long长整型数val(3.21)=315．答案：（1）62（2）125简析：本程序功能是求100之内1、5、25之和（i=i*5），而s=s+a*i求1*2+5*2+25*2=62，当i=25*5=125大于100才结束。文本框1显示s值，文本框2显示i值16．答案：a<0ora>255a\2简析：第一个空格是if…then判断语句的条件，即0-255之间；第二空格是a=a\2取a的商值，每次将商值除以2的余数存在c(i)里17．答案：（1）0mmod3=0m+10（2）枚举算法简析：（1）n是一个计数