2022-2023學年云南省昭通市鎮(zhèn)雄一中高一(上)期末信息技術試卷
發(fā)布:2024/4/20 14:35:0
一、選擇題
-
1.“猴子吃桃“問題:一天,有一只猴子從樹上摘下若干個桃子,當即吃了一半,覺得不過癮,又吃了一個.第二天小猴子接著吃剩下的一半,還覺得不過癮,又吃了一個.以后每天都是吃前一天剩下的一半并再吃多一個.到第四天,猴子按規(guī)則吃完桃子后,只剩一個桃子.問小猴子第一天摘了多少個桃子.右圖所示是根據(jù)分析所畫出的部分流程圖.采用倒推算法,其中設定M的初始值為1(第四天吃完后剩下的桃子數(shù)),D為天數(shù)(初始值為5).請在下面的①和②(對應流程圖中相應空缺位置)填入相應選項.①、②分別為( ?。?/h2>
組卷:3引用:2難度:0.7 -
2.以下術語中表示文件傳輸協(xié)議的是( ?。?/h2>
組卷:0引用:2難度:0.6 -
3.最新消息:全國信息安全標準化技術委員會日前明確要求,網(wǎng)聯(lián)汽車采集數(shù)據(jù)不得在境外存儲。這說明( ?。?/h2>
組卷:3引用:3難度:0.7 -
4.隨著現(xiàn)代信息技術的發(fā)展,出現(xiàn)了很多新型的電子產(chǎn)品,如智能眼鏡、智能手表等等.下列說法中,不符合信息技術發(fā)展趨勢的是( ?。?/h2>
組卷:9引用:5難度:0.9 -
5.有如下VB程序段:
For i=2 to 5
For j=i to 5
If j mod i=0 then a(j)=a(j)+1
Next j
Next i
For i=1 to 5
If a (i)<>1 then s=str(i)+s
Next i
若數(shù)組a 的初始值都為0,則運行該程序段后,s的值為( )組卷:0引用:1難度:0.4 -
6.馮諾依曼型體系結(jié)構(gòu)的計算機中引進了兩個重要的概念,它們是( )
組卷:3引用:2難度:0.6 -
7.某單位的域名為:jyeoo.jye.ai,其網(wǎng)址(URL)的完整寫法是( )
組卷:2引用:1難度:0.7 -
8.李明通過電子郵件給遠在美國的父親成功發(fā)送了一張賀卡,在他父親沒有接收郵件之前,該電子郵件將( ?。?/h2>
組卷:3引用:2難度:0.5 -
9.二進制數(shù)11101與十進制數(shù)2相加的結(jié)果是( ?。?/h2>
組卷:0引用:1難度:0.6 -
10.下列關于Excel的敘述,錯誤的是( ?。?/h2>
組卷:12引用:11難度:0.9
三、操作題
-
31.星期天,小龍來到動物園游玩,園內(nèi)共有N個景點(可在10個以上),每個景點都有一個標號,標號為1至N.現(xiàn)在只知道每個景點有一條路連接下一個景點。小龍想知道,根據(jù)這些道路信息,從其中一個景點出發(fā),最后再回到出發(fā)景點,最多能游玩多少個景點。
例如,共有N=5個景點,每個景點連接的下一個景點分別是2,4,5,5,2。景點號 1 2 3 4 5 下一景點號 2 4 5 5 2
程序代碼如下:
PrivateSubCommand1_Click ( )
Dima(1To100)AsInteger,d(1To100)AsInteger
DimjdAsString,mAsString,cAsInteger,iAsInteger
DimsAsInteger,pAsInteger,kAsInteger,ansAsInteger
jd=Text1.Text+″,″
s=0:c=0
Fori=1ToLen(jd)
m=Mid(jd,i,1)
Ifm<>″,″Then
①
Else
c=c+1:a(c)=s:s=0
EndIf
Nexti
ans=0:k=0
Fori=1Toc
Fork=1Toc
d(k)=0
Nextk
Ifd(i)=0Then
p=i
DoWhilep<=c
Ifd(p)=0Then
k=k+1:d(p)=k
Else
②
Ify>ansThenans=y
k=0
ExitDo
EndIf
Loop
EndIf
Nexti
Text2.Text=Str(ans)
EndSub
(1)要使程序運行時,F(xiàn)orm1的BackColor屬性值為黑色,以下代碼正確的是A.PrivateSubForm_Load ( ?。?br />Form1.BackColor=RGB(255,255,255)
EndSubB.PrivateSubForm_Load ( ?。?br />Form1.BackColor=RGB(0,0,0)
EndSubC.PrivateSubForm1_Load ( ?。?br />orm1.BackColor=RGB(255,255,255)
EndSubD.PrivateSubForm1_Load ( ?。?br />Form1.BackColor=RGB(0,0,0)
EndSub
(3)請把橫線處的代碼補充完整:
①
②
(4)程序加框處代碼有錯,請改正:組卷:2引用:2難度:0.2 -
32.現(xiàn)有一個大小為n*n的平面矩陣(從上到下從左到右編號為1~n*n),矩陣中有諸多障礙物。有兩個機器人分別為1號和2號,其中1號位于左上角且面朝右側(cè),2號位于右下角且面朝左側(cè)?,F(xiàn)在機器人需要按照規(guī)則進行K輪運動,規(guī)則如下:
①1號和2號機器人需要交替運動,即第一輪由1號進行運動,第二輪則由2號進行運動,第三輪由1號進行運動……以此類推直至第K輪。
②每輪運動時,機器人將先判斷前方是否可以前進,若無法前進,則不斷順時針旋轉(zhuǎn)90°至可以前進為止,隨后前進直至停止,由另一個機器人開始下一輪運動。
③機器人在前進過程中遇到邊界、障礙物或者另一個機器人時都將停止。
如圖a所示,機器人1號和2號分別位于左上角和右下角,且分別朝向右側(cè)和左側(cè),黑塊表示障礙物,當進行了4輪運動后,狀態(tài)如圖b所示。
編寫程序,啟動后隨機生成矩陣并在List1中輸出,其中“#“表示障礙物,“_”表示可以行走的空格子,機器人用數(shù)字1和2表示。在文本框Text1中輸入輪數(shù)K,點擊按鈕Command1,在列表框List1中輸出K輪后的矩陣。程序界面如圖c所示。
(1)若在圖a的基礎上進行6輪運動后,1號機器人所在的位置是
(2)實現(xiàn)上述功能的部分VB程序如下,請在橫線處填入合適的代碼。
Const n=10
Dim a(100)As String,steps(3)As Integer,pos(2)As Integer
Dim towards(2)As Integer,cur As Integer,nex As Integer,K As Integer
Private Sub Form_Load ______
'生成矩陣存儲在數(shù)組a中并輸出,代碼略
End Sub
Private Sub Command1_Click_____
steps(0)=-n:steps(1)=1:steps(2)=n:steps(3)=-1
pos(1)=1:towards(1)=1:pos(2)=n*n:towards(2)=3
i=1:K=Val(Text1.Text)
Do While i<=K
cur=(i-1)Mod 2+1
nex=GetNext(pos(cur),towards(cur))
Do While Check(nex)
pos(cur)=nex
nex=GetNext(pos(cur),towards(cur))
Loop
nex=GetNext(pos(cur),towards(cur))
Do While Not Check(nex)
towards(cur)=______
nex=GetNext(pos(cur),towards(cur))
Loop
i=i+1
Loop
'輸出矩陣,代碼略
End Sub
Function Check(x As Integer) As Boolean
Check=x<>0 And a(x)<>“#“And _____
End Function
Function GetNext(x,t) As Integer
GetNext=x+steps(t)
If x>=1 And x<=n And t=0 Then GetNext=0
If x>(n-1)*n And x<=n*n And t=2 Then GetNext=0
If _____ Then GetNext=0
If x Mod n=0 And t=1 Then GetNext=0
End Function組卷:0引用:1難度:0.3