浙教版初中信息技术九年级上学期期末试卷（1）

更新时间：2021-04-23 浏览次数：74 类型：期末考试

一、选择题

1. 在条件选择语句If …… Else If …… Else If …… End If中，当If结构内有多个条件都为True时，则( )

A . VB依次执行条件为True的后面的语句块 B . VB执行第一个为True的条件后面的语句块 C . VB执行最后一个为True的条件后面的语句块 D . VB执行任一个为True的条件后面的语句块

答案解析收藏纠错 + 选题
2. 在vb中，x+y小于10且x-y大于5的逻辑表达式是（）

A . x+y<10 or x-y>5 B . (x+y<10) : (x-y)>5 C . x+y<10; x-y>5 D . x+y<10 and x-y>5

答案解析收藏纠错 + 选题
3. 已知x=4，则vb表达式Sqr(x)的值是（）

A . 1 B . 2 C . 3 D . 4

答案解析收藏纠错 + 选题
4. 有一把锁和一串钥匙（共有10把钥匙，其中配套的钥匙有若干把），怎样找出能开这把锁的所有钥匙？设计的算法是：一把一把钥匙尝试开锁，开锁后将能开的钥匙做好标记，最后有标记的钥匙就是能开锁的钥匙，此算法属于（）

A . 解析算法 B . 枚举算法 C . 递归算法 D . 排序算法

答案解析收藏纠错 + 选题
5. 在Visual Basic中，用变量p存储数值3.1415，变量p的数据类型应定义为（）

A . Boolean B . Integer C . Single D . String

答案解析收藏纠错 + 选题
6. 在Visual Basic中，语句Soft.Text="QQ2015"中的Soft是（）

A . 属性名 B . 属性值 C . 对象名 D . 窗体名

答案解析收藏纠错 + 选题
7. 在Visual Basic中，如果给变量a、b都赋值为3，则下列语句正确的是（）

A . a=3:b=3 B . a=b=3 C . a=3,b=3 D . a=3;b=3

答案解析收藏纠错 + 选题
8. 小明用计算机解决数值交换问题时经历了若干阶段，其中设计算法属于（）

A . “分析问题确定要用计算机做什么”阶段 B . “寻找解决问题的途径和方法”阶段 C . “用计算机进行处理”阶段 D . “运行调试”阶段

答案解析收藏纠错 + 选题
9. 下列关于算法的描述，正确的是（）

A . 描述算法的方法只能是流程图 B . 算法过程要一步一步执行，每一步执行的操作必须确切，不能含混不清，而且经过有限步或无限步后能得出结果 C . 同一种算法只能用一种程序语言来实现 D . 算法是描述解决问题的方法和步骤

答案解析收藏纠错 + 选题
10. 在VB中，对于语句If I=1 Then J=1 else J=2，下列说法正确的是（）

A . I=1 和 J=1 都是赋值语句 B . J=1 和 J=2 都是关系表达式 C . I=1为关系表达式，J=1为赋值语句 D . J=1为赋值语句，J=2为关系表达式

答案解析收藏纠错 + 选题

二、综合题

11. 根据流程图回答问题
1. （1）上面流程图执行后，输出的变量t的结果是什么？
2. （2）上面的流程图表示的是程序的哪种结构？
答案解析收藏纠错 + 选题
12. 变量a，b，c分别保存一元二次方程的二次项、一次项系数和常数项（其中a≠0），变量x1和x2分别保存方程的两个根。完善下列程序，使程序运行时能根据方程的a，b，c值计算根并输出相应信息。
d＝

if d>0 then

    x1= (-b + Sqr(d)) / (2 * a)

    x2=

    text4.text=str(x1)

    text5.text=str(x2)

    label6.caption=“有两个不同的实数根”

else

    if then

        x1＝(-b)/(2*a)

        x2=x1

        text4.text=str(x1)

        text5.text=str(x2)

        label6.caption=“有两个相同的实数根”

    else

        text4.text=

        text5.text=""

        label6.caption=

    end if

end if

答案解析收藏纠错 + 选题
13. 计算1到100之和，欲设计的界面如下：
1. （1）设置部分对象及其属性如下表：
  
  对象名
  
  属性名
  
  属性
  
  Command1
  
  计算
2. （2）编写代码：
  Private Sub Command1_Click()
  
      Dim i, s As Integer
  
      s =
  
      For i = 0 To 100 Step 1
  
  
  
      Next i
  
      Label2.Caption = Str(s)
  
  End Sub
答案解析收藏纠错 + 选题

试卷信息

小学

初中

高中

浙教版初中信息技术九年级上学期期末试卷（1）

副标题：

*注意事项：

浙教版初中信息技术九年级上学期期末试卷（1）

试题分析

总体分析

题量分析

难度分析

知识点分析

对象名	属性名	属性
Command1		计算