2019-2020學年浙江省杭州市七縣市高二(上)期末信息技術試卷
發(fā)布:2024/4/20 14:35:0
一、選擇題(本大題共12小題,每小題2分,共24分。每小題列出的四個備選項中只有一個是符合題目要求的,不選、多選、錯選均不得分)
-
1.下列有關信息與信息技術的說法,不正確的是( ?。?/h2>
組卷:3引用:1難度:0.8 -
2.下列有關信息表達與交流的說法,正確的是( ?。?/h2>
組卷:2難度:0.6 -
3.用Word軟件編輯某文檔界面如圖所示,下列說法正確的是( ?。?img alt="菁優(yōu)網" src="https://img.jyeoo.net/quiz/images/202101/214/28981116.png" style="vertical-align:middle" />
組卷:1引用:1難度:0.6 -
4.使用Access創(chuàng)建數據表界面如圖所示,下列說法正確的是( ?。?br />
組卷:1引用:1難度:0.6 -
5.使用UltraEdit軟件觀察字符“2020,cheer up!“的內碼界面如圖所示,以下說法正確的是( )
組卷:2難度:0.5
二、非選擇題(本大題共4小題,其中第13題4分,第14題8分,第15題7分,第16題7分,共26分)
-
15.用VB編寫尋找自然數中第n個素數的程序,具體功能如下:在文本框Text1中輸入正整數n,單擊“尋找”Command1按鈕后,在Label1中顯示結果。程序運行界面如圖所示。
(1)程序啟動后,窗體的標題欄顯示“尋找第n個素數”,Form_Load事件處理過程中應添加語句
A.Form1=“尋找第n個素數”
B.Form1.Name=“尋找第n個素數”
C.Form1.Caption=“尋找第n個素數”
D.Form1.Text=“尋找第n個素數”
(2)請在①、②橫線處填入合適的代碼:加框處③代碼有錯誤,請改正。
Private Sub Command1_ Click ( )
Dim n As Integer,i As Integer
Dim s As Integer,x As Integer,f As Boolean
n=Val(Text1.Text)
f=False:s=0
i=2
Do While①
For x=2 To i\2
If i Mod x=0 Then Exit For'Exit For用于退出For循環(huán)
Next x.
lf_
②
Then
s=s+1.
If[i=n]Then'③
Label1.Caption=“第“& Str(n) &“個素數為:“& Str(i)
f=True
End If
End If
i=i+1
Loop
End Sub組卷:0引用:1難度:0.3 -
16.某二進制字符串的壓縮算法描述如下:
①取字符串的首字符為壓縮后的第-一個字符。
②統計該字符連續(xù)的個數,兩者間使用逗號分隔。
③按此方法進行后續(xù)字符的壓縮,各段壓縮結果用“1”分隔。
④重復上述過程,直到將所有字符壓縮完成。
例如:字符串10000000011110*壓縮后的字符串為“1,2/0,12/1,4/0,1/“.依據上述描述編寫VB程序,實現此算法的解壓縮功能:在文本框Text1中輸入待解壓縮的字符串,單擊“解壓縮”按鈕,在文本框2中輸出解壓縮的字符串。運行效果如圖所示。
(1)若在文本框1中輸入“1,2/0,3/1,2/”,單擊“解壓縮”按鈕后,文本框2中輸出的內容為
(2)實現解壓縮功能的程序代碼如下,請在橫線處填入合適的代碼。
Private Sub Command1_ Click ( ?。?br />Dim i As Integer,x1 As Integer,x2 As Integer,s As String
Dim ch As String,result As String
s=Text1.Text
i=1:result=““
Do While i<=Len(s)
①
lfch<“O“Or ch>“g“Then
Ifch=“/“Then
x2=tmp
Forj=1 To x2
result=result & CSstr(x1)'Cstr 函數的功能是將數字轉為字符串
Next j
Else
②
End If
tmp=0
Else
③
End If
i=i+1
Loop
Text2.Text=result
End Sub組卷:0引用:1難度:0.5