試卷征集
加入會員
操作視頻

某數(shù)據(jù)壓縮方法描述如下:
(1)原始數(shù)據(jù)中,某數(shù)不為0且相鄰無重復(fù),壓縮數(shù)據(jù)用該數(shù)據(jù)表示;
(2)原始數(shù)據(jù)中,某數(shù)為0且相鄰無重復(fù),壓縮數(shù)據(jù)用兩個數(shù)表示,第1個位0,第2個為0;
(3)原始數(shù)據(jù)中,某數(shù)據(jù)相鄰有重復(fù),壓縮數(shù)據(jù)用3個數(shù)表示:第1個位0,第2個為重復(fù)數(shù)的個數(shù),第3個為該數(shù)本身;
根據(jù)上述壓縮方法,對應(yīng)的解壓縮方法示例如圖a所示.
菁優(yōu)網(wǎng)
小明編寫了一個解壓送VB程序,功能如下:窗體加載時(shí),自動讀取壓縮數(shù)據(jù),依次存儲在數(shù)組元素a(1)、a(2)、a(3)…中,壓縮數(shù)據(jù)的個數(shù)存儲在變量n中,壓縮數(shù)據(jù)顯示在文本框Text1中.單擊“解壓縮”按鈕Command1,程序?qū)嚎s數(shù)據(jù)依次進(jìn)行解壓縮處理,解壓縮數(shù)據(jù)顯示在文本框Text2中.程序運(yùn)行界面如圖b所示.
(1)如果壓縮數(shù)據(jù)為“23,0,21,66,0,0,77,0,5,0”,則解壓縮數(shù)據(jù)的個數(shù)是
29
29

(2)實(shí)現(xiàn)上述功能的VB程序如下.請?jiān)跈M線處填入合適代碼.
Dim a(1To 100)As Integer'存儲壓縮數(shù)據(jù),最大處理個數(shù)為100
Dim b(1To 1000)As Integer'存儲解壓縮數(shù)據(jù),最大處理個數(shù)為1000
Dim n As Integer'存儲壓縮數(shù)據(jù)的個數(shù)
Private Sub Form_Load (  )
'壓縮數(shù)據(jù)由上述壓縮方法生成
'本過程用于讀取壓縮數(shù)據(jù)并存儲在數(shù)組a,壓縮數(shù)據(jù)個數(shù)存儲在變量n中
'代碼略
End Sub
Private Sub Command1_Click ( ?。?br />Dim pa As Integer'存儲壓縮數(shù)組當(dāng)前處理位置
Dim pb As Integer'存儲解壓縮數(shù)組當(dāng)前處理位置
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.

【答案】29
【解答】
【點(diǎn)評】
聲明:本試題解析著作權(quán)屬菁優(yōu)網(wǎng)所有,未經(jīng)書面同意,不得復(fù)制發(fā)布。
發(fā)布:2024/6/27 10:35:59組卷:14引用:2難度:0.1
相似題
  • 1.一數(shù)據(jù)文件壓縮后的大小是512KB,已知其壓縮比20:1,原文件大小是( ?。?/h2>

    發(fā)布:2024/12/14 14:0:1組卷:30引用:3難度:0.6
  • 2.由于數(shù)字化后的視頻占用的空間非常龐大,為了便于存儲和傳輸,需要對它進(jìn)行壓縮。
     
    (判斷對錯)

    發(fā)布:2024/11/16 23:30:1組卷:4引用:3難度:0.7
  • 3.數(shù)據(jù)壓縮分為有損壓縮和無損壓縮兩種。
     
    (判斷對錯)

    發(fā)布:2024/12/5 19:0:1組卷:3引用:3難度:0.8
小程序二維碼
把好題分享給你的好友吧~~
APP開發(fā)者:深圳市菁優(yōu)智慧教育股份有限公司| 應(yīng)用名稱:菁優(yōu)網(wǎng) | 應(yīng)用版本:5.0.7 |隱私協(xié)議|第三方SDK|用戶服務(wù)條款
本網(wǎng)部分資源來源于會員上傳,除本網(wǎng)組織的資源外,版權(quán)歸原作者所有,如有侵犯版權(quán),請立刻和本網(wǎng)聯(lián)系并提供證據(jù),本網(wǎng)將在三個工作日內(nèi)改正