浙江省台州市2017-2018学年高二上学期信息技术第一次月...

更新时间：2018-06-05 浏览次数：298 类型：月考试卷

一、选择题

1. 下列有关信息的说法，错误的是( )

A . 现在很多智能手机有了指纹锁，是为了提升信息的安全性 B . 人类在造纸术和印刷术产生之前，信息无法存储 C . 公民身份证号和考生准考证号的编排，都属于信息的编码 D . 不同的载体的可以承载同样的信息

答案解析收藏纠错 + 选题
2. 在计算机内，有符号数有3种表示法：原码、反码和补码。
⑴原码就是二进制定点表示法，即最高位为符号位，“0”表示正，“1”表示负，其余位表示数值的大小；
⑵反码表示法规定：正数的反码与其原码相同；负数的反码是对其原码逐位取反，但符号位除外。如二进制原码10010，则反码11101(注：在10010中，左边的1为符号码，故为负)；
⑶补码表示法规定：正数的补码与其原码相同；负数的补码是在其反码的末位加1，符号位除外。
根据以上运算规则，二进制有符号数100011的补码的十进制表示是( )

A . －29 B . －4 C . －61 D . －36

答案解析收藏纠错 + 选题
3. 使用UltraEdit软件观察字符“挑战AlphaGo！”的内码，部分界面如图所示。

下列说法正确的是（）

A . 字符“！”的内码占两个字节 B . 字符“战”的十六进制码是“BD 41” C . 字符“h”的二进制码是“01101000” D . 字符“go”的十六进制码是“47 6F”

答案解析收藏纠错 + 选题
4. 某文件夹下共有100张属性相同的BMP图片，共占用了约75MB的存储空间，已知图片的分辨率为1024*768，问这种图片包括多少种颜色（）

A . 8 B . 16 C . 256 D . 512

答案解析收藏纠错 + 选题
5. (2016高二上·杭州期末) 将一个时长为1分钟、采样频率为44.1kHz、量化位数为16、双声道未经压缩的Wave格式音频文件压缩为MP3格式文件，压缩后的MP3格式文件大小为940KB，则其压缩比约为（）

A . 11 : 1 B . 11 : 2 C . 11：4 D . 88 : 1

答案解析收藏纠错 + 选题
6. VB表达式9\8/2 + 12 Mod 3*3 -2^-2 的值是( )

A . 3.25 B . 4.75 C . 5 D . 7

答案解析收藏纠错 + 选题
7. 有如下VB程序段：
Dim a As Integer, b As Integer, c As Integer, y As Integer
a=3:b=4:c=4
If a<=b And c<=a Then
y=a+b
ElseIf a<=b or b<=c Then
y=b+c
ElseIf b=c Then
y=a mod c
Else
y=a+b+c
End If
该程序段运行之后，变量y的值为（）

A . 3 B . 7 C . 8 D . 11

答案解析收藏纠错 + 选题
8. 某两段VB程序分别如图1和图2所示：
Dim n As Integer, s As Integer, i As Integer
n=Val(Text1.Text)
s=0
For i=1 To n Step 2
s=s+i
Next i
Text2.Text=Str(s)
图1
Dim n As Integer, s As Integer, i As Integer
n=Val(Text1.Text)
s=0
i=1
Do While i<=n
s=s+i
i=i+2
Loop
Text2.Text=Str(s)
图2
当n的值为10时，关于该两段程序，下列说法不正确的是( )

A . 两段程序中i的初值相同 B . 两段程序的运算结果不相同 C . 两段程序都采用了循环结构 D . 图1程序实现了“1＋3＋5＋7＋9”和的运算

答案解析收藏纠错 + 选题
9. 有如下VB程序段：
Dim a(1 To 5) As Integer, i As Integer, c As Integer
a(1)=2:a(2)=1:a(3)=3:a(4)=4:a(5)=5
c=0
For i=3 To 5
If a(i-2)+a(i-1)=a(i) Then c=c+1
Next i
Text1.Text=Str(c)
该程序段运行后，文本框Text1中显示的内容是（）

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

答案解析收藏纠错 + 选题
10. 单击窗体后，文本框Text1、Text2中显示的内容是( )
Private Sub Form_Click( )
Dim x as Integer, n as Integer
x=1
n=0
Do While x < 20
n=n+1
x=x * 3
Loop
Text1.Text=Str(x)
Text2.Text=Str(n)
End Sub

A . 27 3 B . 3 27 C . 20 3 D . 3 21

答案解析收藏纠错 + 选题
11. 已知存有6个数字的数组d，其数组元素如下表，则以下程序的输出结果为( )

A . -8 B . -6 C . 9 D . 12

答案解析收藏纠错 + 选题
12. 有如下VB程序段：
Dim a(1 To 10) As Integer，i As Integer，j As Integer
a(1)=1
a(2)=1
For i=3 To 5
a(i)=1
For j=i-1 To 2 Step -1
a(j)=a(j)+a(j-1)
Next j
Next i
Text1.Text=Str(a(3))
该程序段运行后，在文本框Text1中显示的内容是( )

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

答案解析收藏纠错 + 选题

二、非选择题

13. 编写VB程序，实现如下功能：在文本框Text1、Text2中分别输入一个正整数，单击“计算累加和”按钮，在标签Label3中显示起始值与结束值之间所有奇数的累加和。界面如图所示。
1. （1）在设计应用程序界面时，要将窗体的标题改为“计算累加和”，应将窗体的属性的值更改为“计算累加和” (填写相应属性名)。
2. （2）为实现上述功能，请在划线处填入合适代码。
  Private Sub Command1_Click()
  Dim x1 As Integer，x2 As Integer，n As Integer
  Dim sum As Long
  x1＝Val(Text1.Text)
  x2＝Val(Text2.Text)
  Sum＝0
  If x1<x2 Then n＝1 Else
  For i＝x1 To x2 Step n
  IfThen
  sum＝sum＋i
  Next i
  Label3.Caption＝“从”& x1 &“到”& x2 &“之前所有奇数的累加和＝”& Str(sum)
  End Sub
答案解析收藏纠错 + 选题
14. 小丁想买几张6+1彩票，选号时，他希望前4位用自己的生日：11月8日，即1108，特别号码他选了买彩票日子的个位数5，并且他希望前六个数字组成的数能被他的幸运数字9整除。他的好朋友小杰帮他设计了一个VB程序，可以提供一份符合这些要求的号码清单供他挑选。相应的界面如图1所示。阅读程序并完成后面的问题。
1. （1）设计应用程序界面时，为添加a所指向的对象，应使用图2所示的“控件工具箱”中的（填写相应编号）。
2. （2）请根据题意将下列程序补充完整。
  Private Sub Command1_Click()
  Dim i As Integer, j As Integer, c As Integer,n As Long
  c = 0
      n = 110800 + i
              If Then
          List1.AddItem Str(n) + " " + "5"
  
     End If
  Next i
  Label2.Caption = "满足条件的数有：" + Str(c) + "组"
  End Sub
答案解析收藏纠错 + 选题
15. 编写“数字序列”程序，实现如下功能：在文本框Text1中输入[100,500]范围内的整数，单击“生成”按钮Command1，在列表框List1中显示9个该序列的数字。数字序列的生成规则为：该项的数字+该数百位上的数字+该数十位上的数字+该数个位上的数字=下一项的数字，例如：365+3+6+5=379。小明编写了VB程序，运行的界面如图所示，程序代码如下：
1. （1）代码“Private Sub Command1_Click()”中的Command1_Click()是_________。（单选，填字母）
  
  A . 对象名 B . 事件 C . 事件处理过程 D . 方法
2. （2）为实现上述功能，请在划线处填入合适的代码。
  Private Sub Command1_Click()
  Dim n As Integer, i As Integer
  Dim a As Integer
  Dim b As Integer
  Dim c As Integer
  List1.Clear
  n = Val(Text1.Text)
  If n >= 100 And n <= 500 Then
               For i = 1 To 9
             A．位置一
                 a = n \ 100
                 b = (n - 100 * a) \ 10
                 c = n Mod 10
  
               B．位置二
               Next i
              C．位置三
  Else
                  List1.AddItem "输入数值有误"
  End If
           D．位置四
  End Sub
3. （3）上述代码段中缺少了List1.AddItem Str(i) + "." + Str(n)，此句代码应该加在（填字母）位置。
4. （4）若输入的数字为123，则第三项的值为。
答案解析收藏纠错 + 选题
16. 小婷编写了一个VB程序，实现如下功能，在文本框Text1中输入一个4位整数zs，单击解密按钮后，在List1列表框中显示当前zs值降序开始的10位相邻整数“解密前”和“解密后”的信息，运行界面如图所示。
解密规则：将整数中各个位中的每一位值乘以5，然后除以8所得余数即为该位的值，然后将所得数的首末位进行交换。如数字9357，解密后的值为3715。
1. （1）观察程序代码，可知“解密”按钮的对象名是
2. （2）实现上述功能，请在划线处填入合适的代码。
  Private Sub Decryp_Click( )
  Dim zs As Long, g As Integer
  Dim b As Integer, q As Integer
  Dim m As Integer, s As Integer
  Dim jmh As String
  zs = Val(Text1.Text)
  For m = zs To
  q = (m \ 1000) * 5 Mod 8
  b = ((m \ 100) Mod 10) * 5 Mod 8
  s = ((m \ 10) Mod 10) * 5 Mod 8
  g = (m Mod 10) * 5 Mod 8
  List1.AddItem Str(m) + " " + jmh
  Next m
  End Sub
3. （3）由上述算法可知，四位数“6124”对应的解密数值是
答案解析收藏纠错 + 选题