数据压缩分为有损压缩和无损压缩两种。 √√（判断对错）
【考点】数据压缩．
【答案】√
【解答】
【点评】
声明：本试题解析著作权属菁优网所有，未经书面同意，不得复制发布。
发布：2024/12/5 19:0:1组卷：3引用：3难度：0.8
相似题
-
1．某数据压缩方法描述如下：
（1）原始数据中，某数不为0且相邻无重复，压缩数据用该数据表示；
（2）原始数据中，某数为0且相邻无重复，压缩数据用两个数表示，第1个位0，第2个为0；
（3）原始数据中，某数据相邻有重复，压缩数据用3个数表示：第1个位0，第2个为重复数的个数，第3个为该数本身；
根据上述压缩方法，对应的解压缩方法示例如图a所示．
小明编写了一个解压送VB程序，功能如下：窗体加载时，自动读取压缩数据，依次存储在数组元素a（1）、a（2）、a（3）…中，压缩数据的个数存储在变量n中，压缩数据显示在文本框Text1中．单击“解压缩”按钮Command1，程序对压缩数据依次进行解压缩处理，解压缩数据显示在文本框Text2中．程序运行界面如图b所示．
（1）如果压缩数据为“23，0，21，66，0，0，77，0，5，0”，则解压缩数据的个数是．
（2）实现上述功能的VB程序如下．请在横线处填入合适代码．
Dim a（1To 100）As Integer'存储压缩数据，最大处理个数为100
Dim b（1To 1000）As Integer'存储解压缩数据，最大处理个数为1000
Dim n As Integer'存储压缩数据的个数
Private Sub Form_Load （ ）
'压缩数据由上述压缩方法生成
'本过程用于读取压缩数据并存储在数组a,压缩数据个数存储在变量n中
'代码略
End Sub
Private Sub Command1_Click （ ）
Dim pa As Integer'存储压缩数组当前处理位置
Dim pb As Integer'存储解压缩数组当前处理位置
Dim firstdata As Integer,count As Integer,i As Integer
pa=1：pb=1
Do While pa＜=n
firstdata=a（pa）
If firstdata＜＞0Then'示例1情况处理
b（pb）=firstdata
pa=pa+1：pb=pb+1
Else
count=a（pa+1）
If count=0Then'示例2情况处理
b（pb）=0
pa= ①：pb=pb+1
Else'示例3情况处理
For i=1To count
②
Next i
pa=pa+3：pb=pb+count
End If
End If
Loop
Text2．Text=Str（b（1））
For i=2To ③
Text2．Text=Text2．Text+“，“+Str（b（i））
Next i
End Sub.发布：2024/6/27 10:35:59组卷：18引用：2难度：0.1 -
2．一数据文件压缩后的大小是512KB，已知其压缩比20：1，原文件大小是（ ）
发布：2024/12/14 14:0:1组卷：37引用：3难度：0.6 -
3．由于数字化后的视频占用的空间非常庞大，为了便于存储和传输，需要对它进行压缩。
（判断对错）发布：2024/11/16 23:30:1组卷：4引用：3难度：0.7
