《高一《算法与程序设计》期中考试试卷》由会员分享，可在线阅读，更多相关《高一《算法与程序设计》期中考试试卷（7页珍藏版）》请在金锄头文库上搜索。
1、平湖中学 2007 学年第二学期信息技术期中考试卷考试时间 90 分钟命题：吴海忠审题：史 玮卷 客观题本部分题目的答案请涂写在机读卡上一、判断题（每小题2 分，共 20 分；认为正确的在机读卡上涂A，认为错误的涂C）1、事件就是发生在该对象上的事情。（）2、用户在键盘上按下一个键，则会产生一个Click 事件。（）3、 在面向对象的程序设计中，用属性来描述对象的状态。（）4、 在 VB 中， 文本框具有Caption 属性。（）5、 语句 Dim r As Double ， 意思是声明变量r 为双精度实数型。（）6、 函数 Sqr(X) 是求 X 的算术平方根。（）7、函数 Fix(-5.1
2、) 和函数 Int(-5.1) 的返回值都是-5。（）8、 a=3:b=2:c=-4是三个赋值语句。（）9、确定性是算法的一个主要特征。（）10、 符号常量在程序运行过程中其值也是可以改变的。（）二、选择题(每小题 2 分，共 50 分)11、算法是解决问题的（）A 程序代码B 方法与步骤C 计算公式D 最终结果12、结构化程序设计的三种基本结构是（）A顺序结构、 选择结构、 树型结构B 选择结构、树型结构、循环结构C选择结构、 赋值结构、 树型结构D 顺序结构、选择结构、循环结构13、流程图中开始结束框用来表示算法的开始和结束，以下哪个表示开始结束框（）AB. C. D. 14、 “高速公路
3、上的某处有一测速拍照系统，当车速超过规定时速时，照相机启动拍照，否则不拍照” 。用算法描述照相机的工作流程，合适的算法模式是（）A顺序模式B选择模式C循环模式D树型模式15、Visual Basic是一种面向（）的程序设计语言。A用户B系统C电脑D对象16、如果要改变窗体的标题，则需要设置的属性是（）ACaption BName CText DLabel 17、VB 控制工具箱中的控件是（）A文本框B单选按钮C图片框D标签18、下列控件中既可用于接受用户输入文本，又可用于显示文本的是（）ALabel 控件BTextBox 控件CTimer 控件DCommandButton 控件19、下列可以作
4、为VB 变量名的是（）Anum-3 B 3num CTrue Dnum_2 20、 在程序中用到某一整型变量的数据范围是-40000 40000 ， 则该变量类型应说明为 （）AInteger BByte C Long DBoolean 21、用下面语句定义的数组的元素个数是（）Dim A (-3 To 5) As Integer A 6 B 7 C 8 D 9 22、下列给出的赋值语句中正确的是（）A4 = MB-M =MCB=A3Dx + y = 023、要从文本框TxtShow 中输出“中国您好！ ” ，则以下语句正确的是（）ATextBox.Text= 中国您好！ BTxtShow.T
5、ext= 中国您好！ CTxtShow.Label=中国您好！ DTxtShow.Text= “中国您好！ ”24、与数学表达式x-31 对应的表达式是（）ASqr(x-31) Val(x-31) CAbs(x-31) DStr(x-31) 25、Len( “ Friend ” )的值是（） 。A6 B7 C8 D9 26、下列逻辑表达式中，值为False 的是（）AInt（ 14 / 3 ） = 4 B(1 + 2) 7) CInt （Rnd（） * 3） ”bc”27、已知变量a、b、c 都是整数型，执行下面程序后c 的值为（）if c a then c = a if c b then c
6、 = b A最大值B最小值C中间值D平均值28、下列运算结果中，值最大的是（）A34 B3/4 C4 mod 3 D3 mod 4 29、若变量 a 的值为 2，b 的值为 3，则下列程序段执行后变量c 的值为（）If a5 Then If b3 Then c=a * b Else c= a + b EndIf A5 B-1 C1 D6 30 、下列程序执行后，变量S 的值为（）S=0 : N=1 Do While N=7 S=S+N : N=N+2 Loop A7 B16 C14 D28 31、自定义函数Fa 用来返回输入参数的绝对值。则下划线处应该输入的是（）Function Fa(X A
7、s Double) As Double If _ Then Fa= - X End Function AX0 CX=0 DX0 32、在 VB 中下列运算符优先级别最高的是（）A= B* CNot DMod 33、已知数组ma 中有 N 个整数型元素（下标范围1N） ，下列流程图中变量S 最后保存的是（）A所有元素的和B所有元素的平均值C所有元素的最大值D所有元素的最小值34、流程图片断如下图所示上述流程图执行过后，A、B 的值分别为（）AA 是 20，B 是 30 BA 是 20 ，B 是 20 AA 是 30，B 是 30 DA 是 30 ，B 是 20 35、下面是一段关于计算变量s 的
8、算法：变量 s 的初值为0,p 的初值为 1 变量 i 从 1 起循环到n 循环体内执行s s + p*i ，p -p 输出变量s 的值这个计算s 值的算法中，s 的代数式表示式是（）A12+3 4+(-1)n(n1) B12+3 4+(-1)n-1n C1+2+3+4+ +n D 123 n I 1 S0 I=N ? S=S+ma(I) S=S/N Y N 卷 主观题本部分题目的答案请填写在答卷上注意：划线处每个语句必须写完整，而且仅填写划线处语句，否则不得分。例：If i=k Then Print i 如果要把划线处改为” ik ” ，则正确的填写为：ik ，而填写： 或If ik The
9、n Print i 则不得分。三、填空题（每空格2 分，共 30 分）1、执行下面的程序段后，s 的值为： _ ，i 的值为： _ 。s = 0 For i = 2 To 50 s = s + 1 Next i 2、执行下面的程序段后，a 的值为： _ ，b 的值为： _ 。a = 50 : b = 30 a = a + b b = a - b a = a - b 3、为了实现计算s=1 1/21/3 1/991/100 的值，界面设计如下图所示，单击“计算结果”按钮（Command1 ），结果就会显示在右侧的文本框（Text1 ）中。为了实现这一目标，程序中划线处的语句应更正为：_ 。Pri
10、vate Sub Command1_Click( ) Dim s As Single, i As Integer, t As Integer s = 0 : t =1 For i = 1 To 100 s = s + t * 1 / i t = t * i Next i Text1.Text = “ s=0 ” + Str(s) End Sub 4、下面程序的功能是：找出50 以内所有能被5 整除又能被3 整除的正整数，并将它们累加起来。为了实现这一目标，程序中划线处应更正为_ 。x = 0 For i = 5 To 50 Step 5 If i mod 5 = 3 Then x = x +
11、i Next i 5、火车行李托运按重量收费标准如下：若不超过50 千克，按每千克0.4 元收费；若超过50 千克，超过部分则按每千克0.5 元收费。要求根据输入的托运行李的重量（文本框 Text1 ） ，能计算出托运行李的费用并输出到文本框Text2。下面程序若用于实现上述目标，则划线处应更正为 _ 。Private Sub Command1_Click( ) Dim x As Double x = Val(Text1.Text) If x=50 Then Text2.Text = 0.4 * x Else Text2.Text= 0.5 * x EndIf End Sub 6、求正整数a
12、和 b 之间的完全数。所谓完全数是指它的小于该数本身的因子之和等于它本身，如 61 23，6 即是一个完全数。说明：正整数a 由 Text1 读入， b 由 Text2 读入，如果是完全数，则输出在List1中。Private Sub Command1_Click() Dim a As Integer, b As Integer, i As Integer, j As Integer, sum As Integer a = Val(Text1.Text) b = Val(Text2.Text) For i = To b sum = 1 For j = 2 To i 2 If i Mod j =
13、 0 Then sum = _ Next j If _ Then List1.AddItem i Next i End Sub 7、输出所有个位上是1 同时又是7 的倍数的三位数，并将满足条件的数的个数输出。请将下面的程序补充完整：Private Sub Command1_Click() Dim i As Integer, counter As Integer Counter = 0 For i = 101 To _ Step_ If _ Then List1.AddItem Str(i) counter = counter + 1 End If Next i Print counter En
14、d Sub 8、从改革开放以来，浙江省农村家庭的可支配收入逐年增加，近几年每年增长率在9% 左右。小明一家今年的可支配收入是32000 元，按现在的增长率9%计算， 小明家几年后可支配收入将达到50000 元？根据流程图给出的解题算法，编写的 Visual Basic程序如下。请在和划线处，填入合适的语句或表达式，把程序补充完整。Private Sub Command1_Click()Dim x As Long, p As Double Dim n As Integer x = 32000 p = 0.09 n = 0 Do While x = n = n + 1 Loop Text1.Text = Str(n) End Sub x50000 ? 开始增长率： p9% 结束可支配收入： x32000 所需年数： n0 xx(1+p) nn+1 输出 n Y N 考号：班级：学号：姓名：平湖中学 2007 学年第二学期信息技术期中考试答卷三、填空题（每空格2 分，共 30 分）1、_ , _ 2、_, _ 3、_ 4、_ 5、_ 6、_ , _ , _ 7、_ , _ , _ 8、_ , _
