20xx年4月浙江省技術選考試題及答案word版(編輯修改稿)
2025-06-26 18:11 本頁面
【文章內容簡介】 放一遍。由此可知該聲音文件的大小約為 KB（保留整數(shù)位）。編輯：浙江省桐鄉(xiāng)第一中學 杜宗飛16.【加試題】某地19001999年的平均降水量數(shù)據(jù)保存在數(shù)據(jù)庫中。現(xiàn)要求找出相鄰兩年年平均降水量變化（即本年度與上年度“年平均降水量”差值的絕對值）最大的年份區(qū)間。如果多個符合要求的年份區(qū)間，只輸入距今最近的。小吳為此編寫了VB程序，程序運行時，單擊按鈕Command1后，在文本框Text1中輸出運行結果。實現(xiàn)上述功能的VB代碼如下，但加框處代碼有錯，請改正。Dim w(1 To 100) As Single 39。依次存儲19001999年的年平均降水量數(shù)據(jù)Const n = 100Private Sub Form_Load()39。本過程從數(shù)據(jù)庫中按190001999年依次讀取年平均降水量數(shù)據(jù)，并存儲在數(shù)組w中39。代碼略End SubPrivate Sub Command1_Click()Dim i As Integer, imax As Integer1imax = For i = 3 To nAbs(w(i 1) w(i 2)) If Abs(w(i) w(i 1)) = Then imax = iNext i = 年平均降水量變化最大的年份區(qū)間是 + Str(imax + 1989) + + Str(imax + 1899)End Sub17.【加試題】某數(shù)據(jù)壓縮方法描述如下：1）原始數(shù)據(jù)中，某數(shù)不為0且相鄰無重復，壓縮數(shù)據(jù)用該數(shù)據(jù)表示；2）原始數(shù)據(jù)中，某數(shù)為0且相鄰無重復，壓縮數(shù)據(jù)用兩個數(shù)表示，第1個位0，第2個為0；3）原始數(shù)據(jù)中，某數(shù)據(jù)相鄰有重復，壓縮數(shù)據(jù)用3個數(shù)表示：第1個位0，第2個為重復數(shù)的個數(shù)，第3個為該數(shù)本身；根據(jù)上述壓縮方法，對應的解壓縮方法示例如圖a所示。圖a小明編寫了一個解壓送VB程序，功能如下：窗體加載時，自動讀取壓縮數(shù)據(jù)，依次存儲在數(shù)組元素a(1)、a(2)、a(3)……中，壓縮數(shù)據(jù)的個數(shù)存儲在變量n中，壓縮數(shù)據(jù)顯示咋文本框Text1中。單擊“解壓縮”按鈕Command1，程序對壓縮數(shù)據(jù)依次進行解壓縮處理，解壓縮數(shù)據(jù)顯示在文本框Text2中。程序運行界面如圖b所示。圖b（1）如果壓縮數(shù)據(jù)為“23,0,21,66,0,0,77,0,5,0”，則解壓縮數(shù)據(jù)的個數(shù)是 。（2）實現(xiàn)上述功能的VB程序如下。請在劃線處填入合適代碼。Dim a(1 To 100) As Integer 39。存儲壓縮數(shù)據(jù)，最大處理個數(shù)為100Dim b(1 To 1000) As Integer 39。存儲解壓縮數(shù)據(jù)，最大處理個數(shù)為1000Dim n As Integer 39。存儲壓縮數(shù)據(jù)的個數(shù)Private Sub Form_Load()39。壓縮數(shù)據(jù)由上述壓縮方法生成39。本過程用于讀取壓縮數(shù)據(jù)并存儲在數(shù)組a，壓縮數(shù)據(jù)個數(shù)存儲在變量n中39。代碼略End SubPrivate Sub Command1_Click()Dim pa As Integer 39。存儲壓縮數(shù)組當前處理位置Dim pb As Integer 39。存儲解壓縮數(shù)組當前處理位置Dim firstdata As Integer, count As Integer, i As Integerpa = 1: pb = 1Do While pa = n firstdata = a(pa) If firstdata 0 Then 39。示例1情況處理 b(pb) = firstdata pa = pa + 1: pb = pb + 1 Else
公司管理相關推薦
鄂ICP備17016276號-1