高中信息技术试题37.doc

昆明第一中学20092010学年度上学期期末考试高二年级信息技术试题本试卷分为第I卷（单项选择题）和第II卷（非选择题），试卷共6页，满分100分。考试时间60分钟。第I卷（单项选择题）本试题为单项选择题，每道题只有一个选项是正确的，共25题，每题2分，请将正确答案填入答题卡中。一、选择题（50分，共25题，每题2分）1下面关于算法的认识错误的是（ ）。A. 算法就是计算机程序 B.算法有一个或多个的输出C. 算法是解决问题的方法和步骤 D.算法的步骤必须是有限的2在VB语言中，下列正确的赋值语句是（ ）。A. x - 1 = 2 B. x + 1 = y C. x = y + 1 D. 2 * x = 33设置窗体标题时，应改变窗体的( )。A. Name属性 B. Caption属性 C. BackColor属性 D. Font属性4下列文件名中哪一个是VB工程文件( )。A.form1.obj B.form1.exeC.form1.frmD.form.vbp5算法设计中，常用的算法有解析算法、递归算法、枚举算法（也叫穷举算法）、排序算法等。把问题所有可能的解一一地罗列出来，并对每一个可能的解进行判断，从中挑选出符合条件的解答。这种思想的算法属于( )。A排序算法 B枚举算法 C递归算法 D解析算法6不能使用IF作为变量名的原因是（ ）。A.由英文字母开头 B.后面没有使用数字C.使用了英文单词 D.使用了关键字7在VB语言中，下列合法的变量名是（ ）。A. ab34B.ab/cC. 12a D.(ab)8下列代数式的Visual Basic表达式是（ ）。A(x2- Sqr(Cos(50*3.14/180)+1)/Abs(x)+Sqr(y)B(x2-Sqr(Cos(50)+1)/( Abs(x)+Sqr(y)C(x2- Sqr(Cos(50*3.14/180) +1)/( Abs(x)+Sqr(y)D(x2-Sqr(Cos(50)+1)/ Abs(x)+Sqr(y)9在VB中，表达式Abs(-8) + Len(my pen) - Int(4.942)的值是（ ）。A7B8 C9 D1010下列VB标准函数中能实现从字符串中取出子字符串功能的VB标准函数的函数名是（ ）。A. Val B. Str C. Len D. Mid11在VB语言中，表示5x8的正确表达式是（ ）。A. 5x8 B. x8 C. x5 and x5 and x812计算S=1+1/3+1/5+1/99的值，最适合用到的程序结构是（ ）。A. 循环结构 B. 赋值结构 C. 分支结构D. 顺序结构13在Visual Basic中，已知x、y均是正整数，关系表达式Int(x/y)=x/y为真时，则表示（ ）。A. x不能被y整除B. x能被y整除 C. x小于yD. x与y一定相等14如图所示的流程图为求x的绝对值算法。根据算法，流程图中处的内容是（ ）。A.输入-x B.输入xC.输入yD.输入-y15执行下面的VB程序段后，A的值是（ ）。 Dim A As Integer Dim B As IntegerA=2B=9If AB then A=B Print A=; AA. 9 B. 2 C. 11 D. 716在Visual Basic程序中，如果满足以下表达式就可判断变量X为奇数，该表达式为（ ）。 AInt(Sqr(X) X/2BInt(Sqr(X)=X/2CInt(X/2) X/2DInt(X/2) = X/217以下程序段执行后，整型变量s的值为（ ）。s = 0For i = 1 To 5 Step 1s = s + 1Next iA.0B.1 C.5 D.1518在Visual Basic中，设x=298，能得到其个位数字“8”的正确表达式是（ ）。A. Int(x/100)*100 B. Int(x/10)*10C. Int(x/100) D. x-Int(x/10)*1019设x=4，y=6，则在Text1控件上能显示A=10的语句是（ ）。A. Text1=A=x+y B. Text1.text=A=+Str(x+y)C. Text=A=+Str(x+y)D. Text1.text=A=+Val(x+y)20下列程序段中，x=1 For i=1 To 50 x=x+2Next i循环的步长值是（）。A. 1 B. 50 C. i D. 值不确定21有以下程序段：For i=1 To 3For j=5 To 1 Step -1s=i*jNext jNext i则语句s=i*j的执行次数是（ ）。A. 15B. 16 C. 17 D. 1822如下图所示，流程图虚线框部分的控制结构属于（ ）。A顺序结构 B.分支结构 C.循环结构 D.树型结构23在VB程序设计语言中，其功能是使系统产生的随机数种子真正随机化的语句是（ ）。ARnd BCircle CRandomize DDim24在VB中，执行Dim A As Single: Dim X As String语句后，下述正确的是（ ）。AA和X都是数值型变量 BA和X都是字符串型变量CA是字符串变量，X是单精度型变量 DA是单精度型变量，X是字符串型变量25下面程序的执行后，输出结果是（ ）。Private Sub Form_click()Dim E, F, G As IntegerE=3:F=4:G=5E=F:F=G:G=EPRINT E;F;GEnd sub A3 4 5 B4 5 3 C4 5 4 D4 5 5第II卷（非选择题）本试题为非选择题，共三个大题8个小题，满分50分。请将正确答案填入答题卡中。二、阅读程序（12分，共3题，每题4分）26在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程:Private Sub Command1_Click()Dim a%, b%a = 3b = 5a = a + bb = a - ba = a - bPrint a, bEnd Sub程序运行后，单击命令按钮，则窗体上显示的内容是_27下列VB程序运行时，在文本框Text1中输入数据25，单击命令按钮Command1后，文本框Text2中显示的内容是 。Private Sub Command1_Click()Dim k As Integer, n As Integern = Val(Text1.Text)k = n Mod 10If n = k * k Then Text2.Text = Str(k) Else Text2.Text = Str(n)End Sub28在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程:Private Sub Command1_Click()Dim a As Integer, b As Integer, c As Integera = 1b = 1n = Val(InputBox(请输入N)For i = 3 To n c = a + b a = b b = cNext iPrint cEnd Sub以上程序完成了求解著名的斐波那契数列问题。程序运行后，单击命令按钮，在输入对话框中输入6，则窗体上显示的内容是_。三、完善程序（30分，共4题10空，每空3分）29某市出租车按照行驶距离（以千米为单位按整数计，小数部分四舍五入）计费，行驶距离取整后，计费规则如下：3千米（包括3千米）以内10元；超过3千米但低于10千米（包括10千米）时，超过部分每千米2元；超过10千米时，超过部分每千米3元。现要求编写VB程序（运行界面如右图所示），实现如下功能：在文本框Text1中输入行驶距离，单击“计算”按钮Command1，在标签Label3中显示相应的费用。某同学按此要求编写的程序如下。则程序中划线处应填入的语句是：（1） （2） （3） Private Sub Command1_Click( ) Dim x As Integer, f As Integer （1） x为小数部分四舍五入取整后的行驶距离 If （2） Then f = 10 ElseIf x = 10 Then （3） Elsef=10+（10-3）*2+（x-10）*3 End If Label3.Caption = Str(f)End Sub30在窗体上画出一个Command按钮，修改其中的程序，单击Command1按钮,使其能输出如下图形。则程序中划线处应填入的语句是：（1） （2） （3） Private Sub Command1_Click()Dim I As Integer, j As IntegerFor I = 6 To 1 _(1)_For j = 1 To _(2)_(3)_Next jPrintNext IEnd Sub31英国大数学家哈代发现有这样的一些数，如果它是n位数（n是大于0的整数），则各位数字的n次幂之和等于它本身（称为n位n次幂回归数），其中三位回归数也被称为“水仙花数”，水仙花数是一组特殊的三位数，如果一个三位数其百位、十位和个位数字的立方之和等于该数本身，则此数称为“水仙花”数。如：153故153是水仙花数。下面程序用于求出100999之间的全部水仙花数，则程序中划线处应填入的语句是：（1） （2） Private sub command1_click()Dim a%, b%, c%, m%For m=100 to 999a=Int(m/100) 分离出百位数字ab= (1) 分离出十位数字bc=m-100*a-10*b 分离出个位数字cIf (2) Then list1.additem str(m)Next mEnd sub32根据中国人民银行2008年12月23日对金融机构存、贷款利率调整表，整存整取一年的利率是2.25%，每年结束的时候，将年度利息加入本金作为第二年的本金。例如：第一年存入10000元，第二年的本金为100001.0225=10225元，第三年以此类推。假如今年春节爸爸妈妈给你1000元的压岁钱，你把它以整存整取的形式存进银行，计算最少多少年后，你去取款的时候能够至少拿到1500元。解决上述问题的Visual Basic程序如下，为了实现这一目标，在划线处，填入合适的语句或表达式是:（1） （2） Private Sub Command1_Click()Dim i As IntegerDim p As SingleDim s As Doubles = 1000p=0.0225i = 0Do While （1） （2） i = i + 1LoopPrint i & 年后可以得到 & s & 元 End Sub四、程序设计（8分）33编写Visual Basic程序。（界面已经设计好，只需编写“计算”按钮的程序代码）中国古代数学家张丘建在他的算经中提出了著名的“百钱百鸡问题”：鸡翁一，值钱五；鸡母一，值钱三；鸡雏三，值钱一；百钱买百鸡，翁、母、雏各几何？按现在的理解就是已知公鸡每只5元，母鸡每只3元，小鸡每3只1元。买100只鸡正好用完100元钱，问每种鸡应该各买多少只？ 现在程序界面已经设计好，并且“清除”和“退出”按钮的程序已经编写好，请你编写“计算”按