2020-2021學(xué)年浙江省紹興市諸暨市高三(上)診斷信息技術(shù)試卷(12月份)
發(fā)布:2024/10/31 5:0:2
一、選擇題(本大題共12小題,每小題2分,共24分。每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)是符合題目要求的,不選、多選、錯(cuò)選均不得分)
-
1.微信中有語音轉(zhuǎn)文字功能,以下說法正確的是( )
組卷:2引用:1難度:0.6 -
2.下列有關(guān)網(wǎng)頁與瀏覽器的說法,不正確的是( ?。?/h2>
組卷:1引用:1難度:0.6 -
3.使用Access軟件創(chuàng)建“jsxxb”數(shù)據(jù)表,其設(shè)計(jì)視圖的部分界面如圖所示。
下列說法正確的是( )組卷:1引用:1難度:0.5 -
4.某加密算法如下:
(1)以字節(jié)為單位對(duì)ASCII字符進(jìn)行加密處理;
(2)8位二進(jìn)制數(shù)最高位不處理;
(3)后7位做如下處理:先按位取反,再右移3位,最高位用右移出的最低位填充;
所得的8位二進(jìn)制數(shù)即為密文的編碼。已知某字符的密文為“i”,其對(duì)應(yīng)的原文字符是( ?。?/h2>組卷:3引用:2難度:0.6 -
5.使用Photoshop軟件制作“我的讀書夢(mèng)”作品,部分界面如圖所示。
下列說法正確的是( ?。?/h2>組卷:3引用:1難度:0.7
二、非選擇題(本大題共4小題,其中第13小題4分,第14小題8分,第15小題7分,第16小題7分,共26分)
-
15.索引排序是近年來各類模擬考試中的新寵,而“索引排序”是和“物理排序”相對(duì)應(yīng)的概念,所謂物理排序就是改變數(shù)組元素存儲(chǔ)的物理位置,即直接對(duì)數(shù)組進(jìn)行排序;而索引排序通過增加一個(gè)索引數(shù)組來存儲(chǔ)各數(shù)組元素的下標(biāo),在排序時(shí)不需要對(duì)原數(shù)組進(jìn)行排序,只需對(duì)索引數(shù)組排序即可。小明為了探究索引排序,編寫VB程序演示索引排序算法,功能如下:在文本框Text1中輸入各個(gè)數(shù)據(jù)(用“,”隔開和結(jié)尾),單擊“讀取”按鈕Command1,將各個(gè)數(shù)據(jù)依次存儲(chǔ)到數(shù)組a中;單擊“排序”按鈕Command2,則對(duì)索引數(shù)組b重新排列,使得數(shù)組a中的元素按升序存儲(chǔ)到數(shù)組c中,分別將處理后的索引數(shù)組b和有序數(shù)組c顯示在標(biāo)簽Label1和Label2中。部分運(yùn)行界面如圖所示。
請(qǐng)回答下列問題:
(1)下列對(duì)象中,無 Caption屬性的是
(2)實(shí)現(xiàn)上述功能的VB程序如下,請(qǐng)?jiān)跈M線處填入合適的代碼。
①
②
③
(3)程序加框處代碼有錯(cuò),請(qǐng)改正。
改正:
Dim n As Integer
Dim a(1 To 20)As Integer
Dim b(1 To 20)As Integer
Dim c(1 To 20)As Integer
Private Sub Command1_Click
Dim i As Integer,t As String,ch As String
n=0:t=““
①
Do While i<=Len(Text1.Text)
ch=Mid(Text1.Text,i,1)
If ch=“,“Then
n=n+1
②
b(n)=n
t=““
Else
t=t+ch
End If
i=i+1
Loop
End Sub
Private Sub Command2_Click
Dim i As Integer,j As Integer,t As Integer
For i=1 To n-1
For j=n To i+1 Step-1
If a(j)>a(j-1)Then
t=b(j):b(j)=b(j-1):b(j-1)=t
End If
Next j
Next i
For i=1 To n
③
Label1.Caption=Label1.Caption+Str(b(i))
Label2.Caption=Label2.Caption+Str(c(i))
Next i
End Sub組卷:0引用:1難度:0.3 -
16.給定n個(gè)不同的正整數(shù)(小于等于100),將它們分組,使得每組中任意兩個(gè)數(shù)互質(zhì)(它們的公約數(shù)為1)。按照以下算法對(duì)n個(gè)數(shù)進(jìn)行分組:
n個(gè)正整數(shù)由文本框Text1輸入,依次存儲(chǔ)到a數(shù)組中,b(1 to 25)中存儲(chǔ)100內(nèi)的素?cái)?shù),c數(shù)組存儲(chǔ)每一組的數(shù)字個(gè)數(shù)及對(duì)應(yīng)數(shù)字,d數(shù)組存儲(chǔ)每一組內(nèi)所含的質(zhì)因子,相同質(zhì)因子只存儲(chǔ)一次,最后分組情況顯示在列表框List1中。
c數(shù)組初始狀態(tài):組別 第一組 第二組 … 位置 0 1 2 3 4 5 6 7 8 9 10 11 12 13 … 值 0 0 0 0 0 0 0 0 0 0 0 0 0 0 … 組別 第一組 第二組 … 位置 1 2 3 4 5 6 … 25 26 27 28 29 30 … 50 … 值 0 0 0 0 0 0 … 0 0 0 0 0 0 … 0 …
c數(shù)組變化情況:組別 第一組 第二組 … 位置 0 1 2 3 4 5 6 7 8 9 10 11 12 13 … 值 1 70 0 0 0 0 0 0 0 0 0 0 0 0 … 組別 第一組 第二組 … 位置 1 2 3 4 5 6 … 25 26 27 28 29 30 … 50 … 值 2 5 7 0 0 0 … 0 0 0 0 0 0 … 0 …
分組完畢后數(shù)組存儲(chǔ)情況如表。
c數(shù)組:組別 第一組 第二組 … 位置 0 1 2 3 4 5 6 7 8 9 10 11 12 13 … 值 2 70 99 0 0 0 0 3 25 54 11 0 0 0 … 組別 第一組 第二組 … 位置 1 2 3 4 5 6 … 25 26 27 28 29 30 … 50 … 值 2 5 7 3 11 0 … 0 5 2 3 11 0 … 0 …
(1)按照上述算法,若有“35、40、26、18、63、77”6個(gè)整數(shù),至少分成
(2)請(qǐng)?jiān)跈M線處填入合適的代碼。
Const n=6'數(shù)據(jù)個(gè)數(shù)
Dim a(1 To n) As Integer'存儲(chǔ)原始數(shù)據(jù)
Dim b(1 To 25)As Integer'存儲(chǔ)100以內(nèi)的素?cái)?shù)
Dim c(0 To (n+1)*n) As Integer'存儲(chǔ)每一組的數(shù)字個(gè)數(shù)及對(duì)應(yīng)數(shù)字
Dim d(1 To 25*n) As Integer'd數(shù)組存儲(chǔ)每一組內(nèi)含有的質(zhì)因子
Private Sub Command1_Click
Dim t As Integer,i As Integer,j As Integer
Dim k As Integer,m As Integer,p As Integer
Dim y As Integer,zu As Integer
Dim st As String
For t=1 To n
k=1
i=1
Do While d((k-1)*25+i)<>0
If a(t) Mod d((k-1)*25+i)=0 Then
①
i=0
End If
i=i+1
Loop
m=(k-1)*(n+1)'每一組存儲(chǔ)數(shù)字個(gè)數(shù)的所在位置
c(m)=c(m)+1
②
For j=1 To 25
If a(t) Mod b(j)=0 Then
③
i=i+1
End If
Next j
Next t
p=0
Do While c(p)>0
st=““
For i=1 To c(p)
st=st+Str(c(p+i))
Next i
zu=p\(n+1)+1
List1.AddItem“第“+CStr(zu)+“組為:“+st
'Cstr的功能:將數(shù)值型轉(zhuǎn)為字符串型
p=p+n+1
y=y+1
Loop
List1.AddItem“至少分:“+CStr(y)+“組“
End Sub
Private Sub Form_Load
'讀取文本框Text1中的各個(gè)數(shù)據(jù)依次存儲(chǔ)到數(shù)組a中,存儲(chǔ)100以內(nèi)的素?cái)?shù)到數(shù)組b中,代碼略
End Sub組卷:0引用:1難度:0.3