学进去-教育应平等而普惠
试题
类型:操作题
难度系数:0.40
所属科目:高中信息技术
人类视觉系统一般能分辨2^6灰度等级,而一般的灰度图像采用2^8灰度等级,其中存在一定的视觉冗余。小陈编写了一个“颜色数据压缩”程序,用以优化颜色值数据存储,方法如下:
过程1:当图像量化位数为8位时,颜色的取值范围是[0,255]。现依据视觉冗余的特性,将其颜色值0、1、2、3折算成0;颜色值4、5、6、7折算成1……,以此类推,折算后颜色的取值范围变为[0,63],图像量化位数只需占用6位;
过程2:依据下图方法,将4字节折算数据压缩成3字节压缩数据。

折算后数据

45

34

37

18

二进制位

1

0

1

1

0

1

1

0

0

0

1

0

1

0

0

1

0

1

0

1

0

0

1

0

压缩后数据

182

82


依据上述算法设计了VB程序,界面如图所示。请回答下列问题:

(1)根据题意,结合图中给出的数据,遮挡处的数据是_________

(2)请在划线处填入合适的代码。

Const n = 12

Dim a(1 To n) As Integer

Private Sub Form_Load()

     ’获取原始数据依次存入数组a中,并按统一格式显示在文本框Text1中,代码略

End Sub

Private Sub Command1_Click()

     Dim b(1 To n) As Integer

Dim c(1 To n/4*3) As Integer

Dim i As Integer, j As Integer, s As String


          s = ""
          For i = 1 To n
                 b(i) = _________
                 s = s + ads(b(i))
                 If i < n Then s = s + ","
          Next i
          Text2.Text = s
          j = 1
          For i = 1 To n Step 4
                 c(j) = b(i)* 4 + b(i+1)\16

____________     


                 c(j+2) = (b(i+2) Mod 4)* 64 + b(i+3)
                 j = j + 3
          Next i
          s = ads(c(1))

For i = 2 To n/4*3


                 s = __________
          Next i

Text3.Text = s

End Sub

Function ads(x As Integer) As String

’将数据x转换成4位长的字符串,代码略

End Function

编辑解析赚收入
收藏
|
有奖纠错

同类型试题

优质答疑

y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2

用户名称
2019-09-19

y = sin x, x∈R, y∈[–1,1],周期为2π,函数图像以 x = (π/2) + kπ 为对称轴
y = arcsin x, x∈[–1,1], y∈[–π/2,π/2]
sin x = 0 ←→ arcsin x = 0
sin x = 1/2 ←→ arcsin x = π/6
sin x = √2/2 ←→ arcsin x = π/4
sin x = 1 ←→ arcsin x = π/2

用户名称
2019-09-19
我要答疑
编写解析
解析:

奖学金将在审核通过后自动发放到帐

提交
我要答疑
我要答疑:
提交