2010学年第二学期期中检测期中试题卷(高一信息技术).doc

2010学年第二学期期中检测（2011年4月）高一 信息技术试题卷考生须知：1、本卷共 10页； 2、本卷答案必须做在答案卷上，做在试卷上无效； 3、答题前请在答题卷密封线内填好相关栏目。不得使用计算器。一、选择题（每题2分，30题，共60分）1. 下列关于算法的描述，正确的是（A）一个算法的执行步骤可以是无限的（B）一个完整的算法必须有输出（C）算法只能用流程图表示（D）一个完整的算法至少有一个输入2. 用计算机无法解决打印所有素数的问题，其原因是解决该问题的算法违背了算法特征中的（A）唯一性 （B）有穷性（C）有0个或多个输入 （D）有输出3.在Visual Basic中，Hello.vbp文件属于（A）工程文件 （B）窗体文件 （C）代码文件 （D）类文件4. 在Visual Basic中，语句Year.Caption = 2010 中的Year是（A）属性值 （B）属性名 （C）对象名 （D）类名5. “和谐号”列车规定：旅客可免费携带20Kg行李，携带品的长、宽、高相加不超过130cm，对超过规定的携带品，应提前办理托运手续。用算法描述行李能否托运的处理过程，合适的算法流程是（A）顺序模式 （B）选择模式 （C）循环模式 （D）树型模式6.下列属于Visual Basic数值常量的是（A）321 （B）12*3 （C）Abs(-5) （D）Sqr(9)7.在Visual Basic中，如果要给变量i,j,k都赋值为1，则下列语句正确的是（A）i=j=k=1（B）i,j,k=1（C）i=1,j=1,k=1（D）i=1:j=1:k=18.在Visual Basic中，窗体中添加文本框Text1的正确方法是（A）先单击工具箱中的控件图标，再将鼠标指针移到窗体上，双击鼠标（B）双击工具箱中的控件图标 （C）先单击工具箱中的控件图标，再将鼠标指针移到窗体上，单击鼠标（D）用鼠标左键拖动工具箱中的控件图标到窗体中9.在Visual Basic中，要定义一个一维数组name，用于存储10位学生姓名信息，则正确的数组定义语句是（A）Dim name(1,10) As Integer（B）Dim name(1 To 10) As Integer（C）Dim name(1,10) As String（D）Dim name(1 To 10) As String10.在Visual Basic中，表达式 Abs(-3.5)的值是（A） -3（B） -4（C） 3 （D）3.511. 为找自己第一次上幼儿园时的照片，小张同学依次翻开自己的多本相册来逐张查找。这种查找方法为（A）无序查找 （B）顺序查找 （C）对分查找 （D）随机查找12.在Visual Basic中，要在标签Label2上显示“注意”，则下列操作正确的是（A）在Text属性中输入“注意”（B）在Caption属性中输入“注意”（C）在Font属性中输入“注意”（D）在Name属性中输入“注意”13. 在Visual Basic中，若x表示能被5整除的正整数，则下列逻辑表达式的值一定为真的是（A）x / 5 = 0 （B）x Mod 5 = 0（C）Int(x 5) = 0 （D）5 Mod x = 014. 在校内跳蚤市场中，某班准备的5类商品售出的数量(单位：件)分别是8，10，4，6，3。采用冒泡排序对其进行排序，若完成第一遍时的结果是：3，8，10，4，6，则完成第二遍时的结果是（A）3，8，10，4，6 （B）3，4，8，6，10（C）3，4，8，10，6 （D）3，4，6，8，1015. 计算计件工资的Visual Basic程序运行界面如图所示，单击计算命令按钮Command1，触发的事件处理过程名是 （A）Command1_Click （B）Text1_Click（C）Form_Click （D）Label3_Click16. 报名参加冬季越野赛跑的某班5位学生的学号是：5，8，11，33，45。利用对分查找，查找学号为33号学生的过程中，依次被访问到的学号是（A）5，11，33 （B）8，33（C）11，45，33 （D）11，3317. 在Visual Basic中，a = -100，表达式360 + Str(a)的值是（A）260 （B）360-100 （C）460 （D）36010018.有如下Visual Basic程序段： For j=1 To _ Step 2 t=t*j Next j要使循环体t=t*j执行5次，循环变量的终值可以是（A）-5 （B）0（C）5 （D）1019.卫星沿某星球圆轨道运行，轨道半径是r千米，周期是t秒，根据这些数据估算该星球的质量m的步骤有：输出星球质量m pi=3.14159计算星球质量m=4*pi2*r3/(g*t2)输入轨道半径r和周期tg=6.67*10-11其正确的顺序是（A） （B）（C） （D）20.下列Visual Basic表达式正确的是（A）v0+a*t （B）a2+2bc （C）2*r（D）1/2g*t221. 下面流程图所表示的是根据居民月用电量a，按阶梯递增电价计算相应电费y的算法，该算法属于 （A）解析算法 （B）排序算法（C）枚举算法 （D）对分算法22.下面程序段是利用For语句给数组a赋值： For i= 1 To 6 a(i)=i+1Next i该程序段运行后数组元素a(3)的值为（A）2 （B）3（C）4 （D）523. 运行如下Visual Basic程序，单击命令按钮Command1，出现如图所示的出错信息。发生除数为零错误时所执行的语句是Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Single a = 2 b = a + 1 c = a / (b - 3) Text1.Text = Str(c) End Sub （A） （B） （C） （D）24.在Visual Basic中，若a=1，b=2，c=5，则下列逻辑表达式值为真的是 （A）(ab) And (ac) （B）(ba) And (bc)（C）(ab) Or (ac) （D）(ba) Or (bc)25. 某校有5位学生参加学生会主席竞选，得票数依次为110，98，3，150，67。使用选择排序的方法对得票数进行从大到小排序，需要进行数据互换的次数是（A）5 （B）4 （C）3 （D）226.在Visual Basic中，设x=4126，能得到其百位上数字“1”的正确表达式是（A）x Mod 100 （B）x 100 Mod 10（C）x 100 Mod 100 （D）x 10 Mod 1027.以下程序段是一个完整的Visual Basic块If语句，则划线处的语句应该是If a100 Then a=a+1Else a=a-1_（A）End Sub（B）Loop（C）EndIf（D）Else End28.下面程序段是利用For语句给数组a赋值，使a(1)=2，a(2)=4，a(3)=6，a(100)=200，则划线处的语句应该是For i= 1 To 100 _ Next i（A）a(i)=i+2 （B）a(i)=i*i （C）a(i)=i（D）a(i)=2*i29. 计算某球队平均年龄的部分算法流程图如图所示，其中：c用来记录已输入球员的人数，sum用来计算有效数据之和，d用来存储从键盘输入的球员年龄值，输入0时表示输入结束。 图中空白处理框和处应填入的是（A） sum sum + d c c + 1（B） sum sum + c c c + 1（C） sum sum + d d d + 1（D） sum sum + c d d + 130. 在Visual Basic中，有如下程序：Private Sub Command1_Click() Dim a As Integer, b As Integer, c As Integer Dim d As Integer a = Val(Text1.Text): b = Val(Text2.Text): c = Val(Text3.Text) d = max(a, b) + max(b, c) Text4.Text = Str(d)End SubFunction max(x As Integer, y As Integer) As Integer If x y Then max = x Else max = yEnd Function运行该程序，在文本框Text1、文本框Text2、文本框Text3中分别输入2、-5、6后，单击命令按钮Command1，文本框Text4中显示的是（A）-5 （B）2 （C）6 （D）8二、程序计算题（每题2分，10题，共20分）1.有如下Visual Basic程序段：s=goods=s+luck该程序段运行后，变量s的值是_。2.有如下Visual Basic程序段：m = -5n = -2.6s = m + Int(n)该程序段运行后，变量s的值为_。3.有如下Visual Basic程序段：Dim x As Single, c As Stringx=Val(Text1.Text)If x12 Then c= PMElse c= AMEnd IfLabel1.Caption=c该程序段运行时，在文本框Text1中输入15.6，Label1标签上将显示的是 。4.有如下Visual Basic程序段：a = 30 : b = 20 : c = 5m=aIf b m Then m = bIf c m Then m = c该程序段运行后，变量m的值为 。5.有如下Visual Basic程序段：s = 0i = 3Do While s = 10 s = s + i i = i + 3Loop该程序段运行后，变量s的值为_。6.有如下Visual Basic程序段： k = 0 For i = 1 To 10 If i Mod 3 = 0 Then k = k + 1 Next i该程序段运行后，变量k的值为_。7.下列Visual Basic程序的功能是：计算表达式12+42+72+972的值，并在文本框Text1中输出表达式的值。为了实现这一目标，程序中For语句划线处的循环变量步长应为_。Private Sub Command1_Click()Dim sum As LongDim i As Integersum = 0 For i =1 To 97 Step sum = sum + i*iNext iText1.Text = Str(sum) End Sub8.有如下Visual Basic程序段： s = 0:t=1For i = 1 To 4 t=-t s=s+t*i Next i该程序段运行后，变量s的值为_。9.以下Visual Basic程序的功能是： 计算表达式1+2+4+8+16+32+1024的值，并在文本框Text1中输出结果。为了实现这一功能，程序中划线处的语句应更正为_。Private Sub Command1_Click()Dim a As Integer, s As Longs = 0a = 1Do While a = 1024 s = s + a a = a + 2LoopText1.Text=Str(s)End Sub10.以下Visual Basic程序的功能是：找出自然数1-100之间被3整除的数，并在文本框Text1中输出这些数的累加和。为了实现这一功能，程序中划线处的语句应更正为_。Private Sub Command1_Click()Dim i As Integer, sum As Integersum = 0For i = 1 to 100 If i Mod 3=0 Then sum = sum + 3Next iText1.Text=Str(sum)End Sub三、程序填空（每空4分，5空，共20分）1.有一道趣味题，张老师问李老师:你今年几岁？你爱人今年几岁？李老师笑笑说：我年龄的平方与我爱人年龄之和恰好等于1053。而我爱人年龄的平方与我的年龄之和却等于873。你计算一下吧！ 设李老师年龄为x岁，他爱人年龄为y岁，由题意可得x，y满足的数学式为： x2 + y = 1053 x + y2 = 873 解决此问题的流程图如VB-1所示。根据流程图VB-1编写的Visual Basic程序如下，在(1)和(2)划线处，填入合适的语句或表达式，把程序补充完整。Private Sub Command1_Click() Dim x As Integer, y As Long x = 1 y = 1053 - x * x Do While （1） （2） y = 1053 - x * x Loop Text1.Text = Str(x) Text2.Text = Str(y)End Sub程序中划线处(1)应填入 程序中划线处(2)应填入 2. 某超市打折促销，规定如下：购物未超过500元按原价支付；购物超过500元但未超过1000元，超过500元部分按9折优惠计价；购物超过1000元但未超过1500元，超过1000元部分按8折优惠计价；购物超过1500元但未超过3000元，超过1500元部分按7折优惠计价；购物超过3000元，超过3000元部分按6折优惠计价。根据以上规定，假定购物货款为x元，则实付金额y为: 程序界面如图所示，在输入购物金额（单位：元）后的文本框orgtext中输入购物金额（单位：元），单击实付金额计算按钮（Command1）后，在实际支付金额（单位：元）为后的文本框cashText中输出实付金额。 解决此问题相应的Visual Basic程序如下：Private Sub Command1_Click()Dim x As Single, y As Singlex = Val(orgtext.Text) If x = 500 Then y = x ElseIf Then y = 500 + (x - 500) * 0.9 ElseIf x = 1500 Then y = 500 + 500 * 0.9 + (x - 1000) * 0.8 ElseIf x = 3000 Then y = 500 + 500 * 0.9 + 500 * 0.8 + (x - 1500) * 0.7Elsey = 500 + 500 * 0.9 + 500 * 0.8 + 150