|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
 |
 |
2017年春江蘇省計(jì)算機(jī)二級(jí)VB考試真題1 |
1. 集成電路根據(jù)所包含的電子元件數(shù)目可以分為多種類型,下列縮寫表示的集成電路中,集成度最高的是______ 。 A. LSI B. MSI C. ULSI D. VLSI C 解析:集成度(單個(gè)集成電路所含電子元件的數(shù)目)小于100的小規(guī)模集成電路(SSI),集成度在100--3000的中規(guī)模集成電路(MSI),集成度在3000--10萬的大規(guī)模集成電路(LSI),集成度在10萬到100萬的超大規(guī)模集成電路(VLSI),集成度超過100萬的極大規(guī)模集成電路(ULSI) 。 1 2. 在下列電子文檔格式中,由Adodb Systems公司開發(fā)的,幾乎所有操作系統(tǒng)都支持的,并且可免費(fèi)使用的是______ A. HTML B. DOCX C. XML D. PDF D 解析:HTML用于網(wǎng)頁描述語言,DOCX是word的保存格式,XML是一種用于標(biāo)記電子文件使其具有結(jié)構(gòu)性的標(biāo)記語言,PDF文件格式將文字、字型、排版格式、聲音和圖像等信息封裝在一個(gè)文件中。 5 3. 在下列有關(guān)無線通信和有線通信的敘述中,錯(cuò)誤的是_________ A. 與有線屏蔽雙絞線相比,無屏蔽雙絞線成本高,傳輸距離遠(yuǎn) B. 中波主要沿地面?zhèn)鞑?/SPAN>,繞射能力強(qiáng),適用于廣播和海上通信 C. 短波具有較強(qiáng)的電離層反射能力,適用于環(huán)球通信 D. 微波頻帶很寬,但繞射能力較差,只能作為視距或超視距中繼通信 A 解析:與有線屏蔽雙絞線相比,無屏蔽雙絞線成本低,傳輸距離短,一般在局域網(wǎng)中使用。 4 4. 視頻行業(yè)通常按照數(shù)字+視頻畫面分辨率的高低,將視頻分為標(biāo)準(zhǔn)清晰度,高清晰度,全高清和超高清幾種。對(duì)于全高清視頻來說,目前是指數(shù)字視頻畫面分辨率為_________ A. 3460×2160 B. 1280×720 C. 720×480 D. 1920×1080 D 解析:高清是在廣播電視領(lǐng)域首先被提出的，最早是由美國電影電視工程師協(xié)會(huì)(SMPTE)等權(quán)威機(jī)構(gòu)制定相關(guān)標(biāo)準(zhǔn)。將“高清”定義為720p、1080i與1080p三種標(biāo)準(zhǔn)形式，而1080P又有另外一種稱呼--全高清（Full High Definition）。關(guān)于高清標(biāo)準(zhǔn)，國際上公認(rèn)的有兩條: 視頻垂直分辨率超過720p或1080i; 視頻寬縱比為16:9。480×320或640×480屬于標(biāo)清,1024×720p或1920×1080i (隔行掃描) 屬于高清,1920×1080p屬于全高清,3840×2160,7680×4320屬于超(高)清。 5 5. 通俗的說,算法是解決問題的方法和步驟,它是程序的核心,下列有關(guān)算法的敘述中,錯(cuò)誤的是______ A. 如果對(duì)于某個(gè)問題無法給出算法,則不可能編寫出程序,計(jì)算機(jī)也無法處理該問題 B. 算法設(shè)計(jì)方法有多種,例如枚舉法，迭代法、遞歸法等 C. 從算法需要占用的計(jì)算機(jī)資源角度分析其優(yōu)劣時(shí),重點(diǎn)要考慮時(shí)間代價(jià)和空間代價(jià) D. 任何算法均必須有一個(gè)或多個(gè)輸入,也必須僅有一個(gè)輸出(包括參量狀態(tài)的變化) D 解析:算法的四大特性是確定性,能行性,有窮性,輸出，必須有輸出,可以沒有輸入。 3 6. 無符號(hào)整數(shù)是計(jì)算機(jī)中最常使用的一種數(shù)據(jù)類型，其長度（位數(shù)）決定了可以表示的正整數(shù)的范圍。假設(shè)無符號(hào)整數(shù)的長度是8位，那么它可以表示的正整數(shù)的最大值（十進(jìn)制）是______。 A． 127 B． 128 C． 255 D． 256 C 解析:無符號(hào)是指最高位不再表示符號(hào)位,而是數(shù)值位,8位最大無符號(hào)二進(jìn)制數(shù)是11111111,轉(zhuǎn)換為十進(jìn)制是255。 1 7. 總線最重要的性能是它的傳輸速率,也稱為"帶寬",在一個(gè)32位的總線系統(tǒng)中,若時(shí)鐘頻率為200MHz,總線數(shù)據(jù)周期為1個(gè)時(shí)鐘周期傳輸1次,那么該總線的數(shù)據(jù)傳輸速率為_________ A. 400M/s B. 800M/s C. 1600M/s D. 200M/s B 解析:計(jì)算數(shù)據(jù)傳輸速率的公式: 2 8. 因特網(wǎng)中的IP地址可以分為A類、B類、C類、D類等。在下列4個(gè)IP地址中，屬于A類地址的是______。 A. 28. 129. 200. 19 B. 128. 129. 200. 19 C. 188. 129. 200. 19 D. 222. 129. 200. 19 A 解析:在IPv4地址中,共有4個(gè)數(shù)字,如果第1個(gè)數(shù)字<=127屬于A類地址,如果第1個(gè)數(shù)字大于等于128且小于192的屬于B類地址,如果第1個(gè)數(shù)字>=192且小于224的屬于C類地址;選項(xiàng)B與C是B類IP地址,選項(xiàng)D是C類IP地址。 4 9. 下列有關(guān)PC機(jī)主板的芯片組,、BIOS和CMOS存儲(chǔ)器的敘述中,錯(cuò)誤的是______ A. 從傳統(tǒng)的芯片組來看,芯片組一般分為南橋芯片和北橋芯片,前者是存儲(chǔ)控制中心,后者是I/O控制中心 B. 芯片組的性能參數(shù)包括適用的CPU類型,適用的存儲(chǔ)器類型和可支持的最大容量、支持的I/O接口類型與數(shù)目等等 C. BIOS是存儲(chǔ)在主板上閃速存儲(chǔ)器中的一組機(jī)器語言程序,它是PC機(jī)軟件中最基礎(chǔ)的部分,沒有它機(jī)器就無法啟動(dòng) D. CMOS存儲(chǔ)器存放著與計(jì)算機(jī)系統(tǒng)相關(guān)的一些配置信息,用戶不可能更改其中存儲(chǔ)的信息 D 解析:CMOS存儲(chǔ)器存放著與計(jì)算機(jī)系統(tǒng)相關(guān)的一些配置信息,用戶可以通過CMOS設(shè)置程序更改其中存儲(chǔ)的信息 。 2 10. 下列有關(guān)程序與軟件的敘述中,錯(cuò)誤的是______ A. 所有的程序都是采用機(jī)器語言編寫的,用于描述如何完成某一確定的任務(wù) B. 人們通常將程序及其相關(guān)的數(shù)據(jù)和文檔統(tǒng)稱為軟件,其中程序是軟件的主體 C. 軟件是智力活動(dòng)的成果,與書籍等一樣受到知識(shí)產(chǎn)權(quán)(版權(quán))保護(hù) D. 目前許多軟件產(chǎn)品是免費(fèi)的,用戶可以從有關(guān)網(wǎng)站下載和使用 A 解析:程序的編寫現(xiàn)在一般都采用高級(jí)語言,因?yàn)榫帉懛奖恪?/SPAN> 3 11. 下面關(guān)于控制屬性的說法中,錯(cuò)誤的是__________ A. 控件的Left和Top屬性的值確定了該控件在窗體中的位置 B. 控件的Height和Width屬性的值確定了該控件的大小 C. 控件的Enabled屬性的缺省(默認(rèn))值為True D. 控件的Caption屬性的值指定了該控件的名稱 D 解析:控件的Name屬性的值指定了該控件的名稱, 控件的Caption屬性的值指定了該控件的標(biāo)題。 3 12. 下列有關(guān)數(shù)組的敘述中,正確的是________ A. 用賦值語句給數(shù)組元素賦值后,才可以引用它 B. 若程序中不包含Option Base 語句,則Dim a(0) As Integer定義了只有一個(gè)元素的數(shù)組a C. 在窗體模塊通用聲明處不可以用Public語句定義數(shù)組,所以VB沒有全局?jǐn)?shù)組 D. 定長字符串類型的數(shù)組不可以作為過程的形參 B 解析:A選項(xiàng)錯(cuò)誤,只要定義數(shù)組后,就可以引用數(shù)組里面的元素;C選項(xiàng)錯(cuò)誤,在模塊聲明處可以用Public語句定義數(shù)組;D選項(xiàng)錯(cuò)誤,定長字符串類型的數(shù)組可以作為過程的形參,變長字符串類型的數(shù)組不可以作為過程的形參 。(注: Dim a() As string*10屬于定長聲明, Dim a() As String屬于變長聲明) 6 13. 下列有關(guān)通用過程的說法,錯(cuò)誤的是__________ A. 過程調(diào)用時(shí),實(shí)參與形參的結(jié)合有傳地址和傳值兩種方式 B. 在過程中對(duì)傳址形參的任何操作就是對(duì)相應(yīng)實(shí)參的操作,實(shí)參的值隨形參的改變而改變 C. 過程調(diào)用時(shí)與傳值形參結(jié)合的實(shí)參的數(shù)據(jù)類型必須與形參一致 D. 過程調(diào)用時(shí)與傳值形參結(jié)合的實(shí)參的數(shù)據(jù)類型可以與形參不一致，但要相容 C 解析:過程調(diào)用時(shí)與傳值形參結(jié)合的實(shí)參的數(shù)據(jù)類型可以與形參不一致，因?yàn)槭侵祩鬟f不是地址傳遞,所以相容就可以了,如整型的值可以值傳遞給長整型 。 7 14. 設(shè)整型變量n=3456,下面表達(dá)式結(jié)果不為6453的是_________。 A. n\10^3+(n Mod 10)*10^3+(n\10 Mod 100)*10 B. n\10^3+(n Mod 10)*10^3+(n Mod 1000)-n Mod 10 C. n\10^3+(n Mod 10)*10^3+CInt((n Mod 1000)/10)*10 D. n\10^3+(n Mod 10)*103+Fix((n Mod 1000)/0)*10 C 解析: 運(yùn)算符中^的優(yōu)先級(jí)最高,題目中先執(zhí)行10^3=1000, 因?yàn)?/SPAN>Cint表示將值四舍五入后轉(zhuǎn)換為整型,導(dǎo)致CInt((n Mod 1000)/10)的結(jié)果是46了,導(dǎo)致最后結(jié)果是6463,具體見題目視頻詳細(xì)講解 。 3 數(shù)學(xué)表達(dá)式 A. (12*x+5*y-Sqr(Abs(d^3-m^2)))/Exp(x)/Sin(x) B. (12*x+5*y-Sqr(Abs(d^3-m^2)))/Exp(x)*Sin(x) C. 12*x+5*y-Sqr(Abs(d^3-m^2))/Exp(x)/Sin(x) D. (12*x+5*y-Sqr(Abs(d^3-m^2)))/e^(x)/Sin(x) A 解析: B選項(xiàng)錯(cuò)誤, B選項(xiàng)的意思除以Exp(x)后,乘以Sin(x),與題意不符;C選項(xiàng)缺少了括號(hào),因?yàn)?/SPAN>VB中先乘除,后加減,所以導(dǎo)致不符合題意,D選項(xiàng)中應(yīng)該用Exp表示e值。 4 運(yùn)行下面程序,單擊命令按鈕Command1,則窗體上顯示的第一行是_______________, 第二行是_______________ . Option Explicit Private Sub Command1_Click() Dim i As Single, n As Single , k As Integer k=-1 For i=-0.5 To -6.5 Step -1.5 n=i-0.5 k=k+1 if Int(i)=Fix(i) Then i=i+n Else i=i-k End if Next i print i print n print k End Sub -14@-6.5 解析: 解析:因文字解析不如視頻清晰,具體見本題目的詳細(xì)視頻講解 。 6 執(zhí)行下面程序,單擊命令按鈕Command1,則窗體上顯示的f的值是_______________,t的值是_______________ 。 Option Explicit Private Sub Command1_Click() Dim n As Long, f As Long Dim s As Long ,t As Long n=962815743 Call Rec(n,f,s,t) print f; "*" ; s; "="; t End Sub Private Sub Rec(n as Long, f As Long, s As Long, t As Long) Dim k As Long t = n Mod 10^4 k=n \ 10 ^4 s=k Mod 10^3 f= k\10 ^3 if f*s<> t Then n=(n Mod 10^8) *10+n\10^8 Call Rec(n,f,s,t) End If End Sub 28@4396 解析: 因文字解析不如視頻清晰,具體見本題目的詳細(xì)視頻講解 。 7 執(zhí)行下面程序,單擊命令按鈕Command1，則窗體上顯示的第一行是_______________, 第二行是_______________,最后一行是_______________ 。 Option Explicit Private Sub Command1_Click() Dim k As Integer, m As Integer Dim n As Integer n=7394 k=Len(Cstr(n))\2 Do m=m*10^k+fun(n,k) Loop Until n=0 Print m End Sub Private Function fun(n As Integer, k As Integer) As Integer Dim a As Integer a= n Mod 10^k fun=(a Mod 10) *10 +a\10 n=n\10^k Print fun End Function 49@37@4937 解析: 因文字解析不如視頻清晰,具體見本題目的詳細(xì)視頻講解 。 7 運(yùn)行下面程序,單擊命令按鈕Command1,則A(1,3)的值是_______________ ,A(2,1)的值是_______________ ,A(3,3)的值是_______________ 。 Option Explicit Option Base 1 Private Sub Command1_Click Dim A(3,3) As Integer Dim i As Integer, j As Integer Call Creat(A) For i=1 To 3 For j=1 To 3 Picture1.Print A(i,j); Next j Picture1.Print Next i End Sub Private Sub Creat(A() As Integer) Dim n As Integer, i As Integer, j As Integer For i=3 To 1 Step -1 For j=4-i To 1 Step -1 n=n+1 A(j,j+i-1)=n Next j Next i For i=3 To 2 Step -1 For j=1 To 2 A(i,j)=A(j,i) Next j Next i End Sub 1@3@4 解析: 因文字解析不如視頻清晰,具體見本題目的詳細(xì)視頻講解 。 7 1（完善程序）： 【要求】 1)打開T盤中“P1.vbp”文件，完善程序后，直接保存所有文件。 【題目】 下面程序的功能是找出300以內(nèi)的友誼數(shù)。若兩個(gè)正整數(shù)滿足σ(m)/m=σ(n)/n，則m和n是友誼數(shù)。其中σ(n)函數(shù)表示正整數(shù)n的所有因子之和。例如σ(6)/6，即(1+2+3+6)/6=2，σ(28)/28，即(1+2+4+7+14+28)/28=2，因此6和28是友誼數(shù)。
Option Explicit Private Sub Command1_Click() Dim fz(6 To 300) As Long '數(shù)組fz用于存儲(chǔ)下標(biāo)對(duì)應(yīng)數(shù)值的因子和 Dim i As Integer, j As Integer, sum As Integer, st() As String For i = 6 To 300 (1) For j = 1 To i If i Mod j = 0 Then sum = (2) End If Next j fz(i) = sum Next i Call Verify(fz, st) For i = 1 To UBound(st) List1.AddItem "(" & st(i) & ")" Next i End Sub Private Sub Verify(fz() As Long, s() As String) Dim U As Integer, i As Integer, j As Integer, L As Integer, st As String Dim k As Integer (3) L = LBound(fz) For i = L To U - 1 st = CStr(i) For j = i + 1 To U If fz(i) * j = fz(j) * i Then '判斷σ(m)/m = σ(n)/n st = st & "," & j End If Next j If st <> CStr(i) Then k = k + 1 (4) s(k) = st End If Next i End Sub 答案: (1) sum=0 (2) sum+j (3) u=ubound(fz) (4) Redim Preserve s(k) 解析: 因文字解析不如視頻清晰,具體見本題目的詳細(xì)視頻講解 。 sum=0@sum+j@u=ubound(fz)@Redim Preserve s(k) 2（改錯(cuò)題）： 【要求】 1)打開T盤中“P2.vbp”文件，改正程序中的錯(cuò)誤后，直接保存所有文件； 2)改錯(cuò)時(shí)，不得增加或刪除語句，但可適當(dāng)調(diào)整語句位置。 【題目】 下面程序的功能是找出10～4000以內(nèi)的既是可左截短素?cái)?shù)，又是可右截短素?cái)?shù)的數(shù)�？勺蠼囟趟�?cái)?shù)是指若從最高位起，由左側(cè)依序刪除數(shù)字，其結(jié)果都是素?cái)?shù)的數(shù)。例如9137，由左側(cè)依序刪除數(shù)字，得到的9137，137，37及7均為素?cái)?shù)，因此是可左截短素?cái)?shù)�？捎医囟趟�?cái)?shù)是指若從最低位起，由右側(cè)依序刪除數(shù)字，其結(jié)果都是素?cái)?shù)的數(shù)。例如7393，由右側(cè)依序刪除數(shù)字，得到的7393，739，73及7均為素?cái)?shù)，因此是可右截短素?cái)?shù)。
Option Explicit Private Sub Command1_Click() Dim i As Integer, k As Integer, L As Integer Dim LD As Integer, R As Integer, js As Integer For i = 10 To 4000 LD = Len(i) For L = LD To 1 k = i Mod 10 ^ L If Not Prime(k) Then Exit For Next L For R = 0 To LD - 1 k = i \ 10 ^ R If Not Prime(k) Then Exit For Next R If L < 1 And R < LD - 1 Then Text1.Text = Text1.Text & i & " " js = js + 1 If js Mod 5 = 0 Then Text1.Text = Text1.Text & vbCrLf End If Next i End Sub Private Function Prime(n As Integer) As Boolean Dim k As Integer For k = 2 To Sqr(n) If n Mod k = 0 Then Exit For Next k If n > 1 Then Prime = True End Function 答案: (1) LD = Len(i) 修改為 LD = Len(Cstr(i)) (2) For L = LD To 1 修改為 For L = LD To 1 step -1 (3) If L < 1 And R < LD - 1 Then 修改為 If L < 1 And R > LD - 1 Then (4) If n > 1 Then Prime = True 修改為 If n > 1 And k>sqr(n) Then Prime = True 解析: 因文字解析不如視頻清晰,具體見本題目的詳細(xì)視頻講解 。 LD = Len(Cstr(i))@ For L = LD To 1 step -1@ If L < 1 And R > LD - 1 Then@ If n > 1 And k>sqr(n) Then Prime = True 3（編程題）： 【要求】 1)打開T盤中“P3.vbp”文件，按參考界面形式編輯窗體界面，根據(jù)題目要求編寫和調(diào)試程序后，直接保存所有文件； 2)程序代碼書寫應(yīng)呈鋸齒形，否則適當(dāng)扣分。 【題目】 編寫程序，在10～89210范圍內(nèi)找出符合下列條件的整數(shù)：該整數(shù)可分割為兩個(gè)數(shù)，這兩個(gè)數(shù)之和的平方又等于這個(gè)整數(shù)。例如：2025可拆分為20和25，20+25=45，45^2=2025。 【編程要求】 1)程序參考界面如圖所示，編程時(shí)不得增加或減少界面對(duì)象或改變對(duì)象的種類，窗體及界面元素大小適中，且均可見； 2)運(yùn)行程序，單擊“運(yùn)行”命令按鈕，將符合條件的正整數(shù)顯示在文本框中，并將符合條件的整數(shù)分割及處理過程按參考界面格式顯示在列表框中；單擊“清除”按鈕，將文本框和列表框清空，焦點(diǎn)置于“運(yùn)行”按鈕上；單擊“結(jié)束”按鈕，結(jié)束程序的運(yùn)行； 3)程序中應(yīng)定義一個(gè)通用過程，用于將正整數(shù)分割為兩個(gè)數(shù)字。
Option Explicit Private Sub Command1_Click() Dim i As Long, j As Integer Dim n As String, a As Integer, b As Integer For i = 10 To 89210 n = CStr(i) For j = 1 To Len(n) - 1 Call fenjie(n, j, a, b) If (a + b) ^ 2 = i Then Text1.Text = Text1.Text & i & " " List1.AddItem (i & ":" & a & "+" & b & "=" & a + b & "->" & a + b & "^2" & "=" & (a + b) ^ 2) End If Next j Next i End Sub Private Sub fenjie(n As String, i As Integer, a As Integer, b As Integer) Dim num As Integer num = Len(n) a = Left(n, i) b = Right(n, num - i) End Sub Private Sub Command2_Click() Text1.Text = "" List1.Clear Command1.SetFocus End Sub Private Sub Command3_Click() End End Sub |
