2013年3月全國計算機二級c語言真題

相關推薦

2013年3月全國計算機二級c語言真題

　　一、單選題

　　(1)下列數據結構中，屬于非線性結構的是

　　(2)在下列鏈表中，能夠從任意一個結點出發直接訪問到所有結點的是

　　(3)下列與棧結構有關聯的是

　　(4)下面對軟件特點描述不正確的是

　　(5)下面屬于黑盒測試方法的是

　　(6)下面不屬于軟件設計階段任務的是

　　(7)數據庫管理系統是

　　(8)在E-R圖中，表示實體的圖元是

　　(9)有兩個關系R和T 如下

　　R T

　　A B C A C

　　a 1 2 a 2

　　b 4 4 b 4

　　c 2 3 c 3

　　d 3 2 d 2

　　則由關系R得到關系T的操作是

　　(10)對圖書進行編目時，圖書有如下屬性：ISBN書號，書名，作者，出版社，出版日期。能作為關鍵字的是

　　(11)下列關于Visual Basic標準模塊的描述中，錯誤的是

　　(12)下列變量名中合法的是

　　(13)表達式 66 \ 8 mod 5 & "avg" 的值是

　　(14)下列能正確計算s=1+2+…… +100的程序段是

　　(15)設有如下程序：

　　Private Sub Form_Click()

　　a = 10: b = 20

　　x = a = b

　　Print x

　　End Sub

　　程序運行后，單擊窗體，輸出結果為

　　(16)在面向對象的程序設計中，對象可以執行的操作和可被對象識別的動作分別被稱為

　　(17)下列說法中，錯誤的是

　　(18)設有如下程序：

　　Private Sub Command1_Click()

　　Dim i As Integer, j As Integer

　　For i = 1 To 10

　　i = i + j

　　j = j + 1

　　Next i

　　End Sub

　　程序運行后，單擊命令按鈕Command1，循環執行的次數為

　　(19)設有如下程序：

　　Private Sub Command1_Click()

　　Dim m As Integer, n As Integer

　　m = 1

　　For n = 1 To 5

　　m = m * n

　　If m > 15 Then

　　Exit For

　　Else

　　n = n + 1

　　End If

　　Next n

　　Print m; n

　　End Sub

　　程序運行后，單擊命令按鈕Command1，輸出結果為

　　(20)設有如下程序：

　　Private Sub Form_Click()

　　Dim a, k As Integer

　　Dim n As Integer, s As Integer

　　a = Array(1, 1, 1, 2, 2, 2)

　　For k = LBound(a) To UBound(a)

　　n = n + k

　　s = s + a(k)

　　Print n; s

　　End Sub

　　(21)窗體上有一個文本框，用于接收正整數。為保證輸入數據的合法性　　(即正整數)，可以在該數據輸入結束后準備繼續其他操作時進行數據的合法性檢查。為實現上述目的，應選用的事件是

　　(22)設有如下程序：

　　Private Sub Command1_Click()

　　Dim a(10) As Integer

　　Dim i As Integer, n As Integer

　　n = 6

　　For i = 1 To n

　　a(i) = i * i

　　Next i

　　For i = 1 To n / 2

　　temp = a(i)

　　a(i) = a(n - i)

　　a(n - i) = temp

　　Next i

　　For i = 1 To n

　　Print a(i);

　　End Sub

　　程序運行后，單擊命令按鈕Command1，輸出結果為

　　(23)工程中包含Form1、Form2兩個窗體，Form1是啟動窗體，兩個窗體上都有名稱為 Label1的標簽和名稱為Command1的命令按鈕，窗體外觀分別如圖1、圖2所示：

　　Form1的事件過程如下：

　　Private Sub Command1_Click()

　　Form2.Show

　　End Sub

　　Form2中的事件過程如下：

　　Private Sub Command1_Click()

　　Label1.Caption = Form1.Label1.Caption

　　End Sub

　　關于以下程序，下面敘述中錯誤的是

　　(24)窗體上有一個名稱為Dir1的目錄列表框，一個名稱為File1的文件列表框。當改變目錄列表框的內容時，文件列表框的內容應該與之同步改變。為實現兩控件同步操作，應該使用的事件過程是

　　(25)列表框List1中沒有數據項，現編制如下程序：

　　Private Sub Command1_Click()

　　For i = 1 To 6

　　List1.AddItem i

　　Next i

　　For i = 5 To 3 Step -1

　　List1.RemoveItem i

　　Next i

　　End Sub

　　程序運行后，單擊命令按鈕Command1，則列表框List1中的數據項為

　　(26)一個工程文件中含有窗體Form1、Form2和標準模塊Model1。如果Form1的聲明部分有語句Private x As Integer，且Model1中有語句Public y As Integer，則下列說法中，正確的是

　　(27)下列關于文件及其操作的描述中，正確的是

　　(28)下列操作說明中，錯誤的是

　　(29)在窗體上畫一個名稱為CD1的通用對話框，并編寫如下程序：

　　Private Sub Command1_Click()

　　CD1.Filter = "所有文件(*.*)|*.*|文本文件(*.txt)|*.txt|Word文檔(*.doc)|*.doc"

　　CD1.FilterIndex = 2

　　CD1.Action = 2

　　End Sub

　　運行程序，并單擊命令按鈕Command1，下面描述中正確的是

　　(30)下列關于Visual Basic菜單的敘述中，錯誤的是

　　(31)下列關于Sub Main過程的描述中，錯誤的是

　　(32)設有如下程序：

　　Private Sub Command1_Click()

　　Dim i As Integer

　　str1 = InputBox("輸入一個字符串")

　　str2 = ""

　　i = 0

　　Do While i < Len(str1) / 2

　　str2 = str2 + Mid(str1, i + 1, 1)

　　str2 = str2 + Mid(str1, Len(str1) - i, 1)

　　i = i + 1

　　Loop

　　Print str2

　　End Sub

　　程序運行后，單擊命令按鈕Command1，在彈出的輸入對話框中輸入“abcdef”，則輸出結果為

　　(33)命令按鈕Command1的單擊事件過程如下：

　　Private Sub Command1_Click()

　　Dim x As String

　　Dim y As String

　　x = InputBox("輸入字母", "輸入")

　　y = IIf((ucase9x) <> "A", "表達式1", "表達式2")

　　Print y

　　End Sub

　　運行程序，單擊命令按鈕，在彈出的輸入對話框中輸入“ a”，則以下描述中正確的是

　　(34)設有如下程序：

　　Sub proc(x() As Integer)

　　Static i As Integer

　　x(i) = x(i) + x(i + 1)

　　i = i + 1

　　Loop While i < 2

　　End Sub

　　Private Sub Command1_Click()

　　Dim a(5) As Integer, i As Integer

　　For i = 0 To 4

　　a(i) = i + 1

　　Next i

　　Call proc(a)

　　For i = 0 To 4

　　Print a(i);

　　Next i

　　End Sub

　　程序運行后，單擊命令按鈕Command1，輸出結果為

　　(35)以下程序將隨機產生n個兩位整數，并使用冒泡法將它們按遞增順序排序后輸出。

　　Option Base 1

　　Private Sub Command1_Click()

　　Dim a() As Integer

　　Dim i As Integer, j As Integer

　　Randomize

　　n = InputBox("輸入數據個數")

　　ReDim a(n)

　　For i = 1 To n

　　a(i) = Int(Rnd * 90) + 10

　　Next i

　　For i = 1 To n - 1

　　For j = 1 To n - i

　　If a(j) < a(j - 1) Then

　　temp = a(j): a(j) = a(j - 1): a(j - 1) = temp

　　End If

　　Next j

　　Next i

　　For i = 1 To n

　　Print a(i);

　　Next i

　　End Sub

　　運行以上程序，發現有錯誤，需要對j循環的開始語句進行修改。以下正確的修改是

　　二、填空題。

　　(1)某二叉樹有5個度為2的結點，則該二叉樹中的葉子結點數為。

　　(2)設一個隊列的初始狀態為空。現將元素A,B,C,D,E,F,5,4,3,2,1依次入隊，然后再依次退隊，則元素退隊的順序為。

　　(3)對模塊獨立性度量的兩個定性標準是耦合性與內聚性。描述模塊間互相連接的緊密程度的是。

　　(4)“軟件系統”的系統結構圖如下圖所示：該系統的最大扇出數是。

　　(5)數據庫設計包括概念設計、和物理設計。

　　(6)設有如下程序：

　　Option Base 0

　　Private Sub Command1_Click()

　　Dim 或【arr】

　　Dim i As Integer

　　arr = Array(1, 2, 3, 4, 5, 6, 7, 8, 9)

　　For i = 0 To 3

　　Print arr

　　End Sub

　　當運行程序，并單擊命令按鈕后，窗體上顯示5 4 3 2。請填空，使程序能夠完成此項功能。

　　(7)在窗體上建立一個有4個元素、名稱為Label1的標簽數組，下標從0開始，各元素的Caption屬性值依次為“等”、“級”、“考”、“試”;再畫一個名稱為Timer1的計時器控件，其 Interval屬性設為1000.窗體如圖所示。

　　程序運行時，從左到右反復顯示這4個字，但每次只顯示1個。請填空，使程序實現上述功能。

　　Dim i As Integer

　　Private Sub Form_Load()

　　For i = 0 To 3

　　Label1(i).Visible = False

　　End Sub

　　Private Sub Timer1_Timer()

　　If i 3 Then

　　Label1(i).Visible = True

　　If i = 0 Then

　　Label1(3).Visible =

　　Else

　　Label1 .Visible = False

　　End If

　　i = i + 1

　　Else

　　i = 0

　　End If

　　End Sub

　　(8)窗體上有一個名稱為Combo1的組合框，其中已經添加了若干項目。程序運行時，單擊Command1命令按鈕，會把選中的項目從組合框中刪除。請填空。

　　Private Sub Command1_Click()

　　Dim str As String

　　Dim i As Integer

　　str = RTrim( .Text)

　　If str > "" Then

　　For i = 0 To

　　If Combo1.List(i) = str Then Combo1.RemoveItem

　　Next i

　　End If

　　End Sub

　　(9)設命令按鈕的單擊事件過程如下：

　　Private Sub Command1_Click()

　　Open "e:\file1.txt" For As #1

　　Print #1, "Testing"

　　Close #1

　　Open "e:\file1.txt" For Append As #1

　　#1, "ABCDEF"

　　Close #1

　　End Sub

　　程序的功能是：建立一個名稱為file1.txt的文件，寫入字符串“Testing”，關閉文件后再次打開，再寫入字符串“ABCDEF”。請填空使程序完整。

【3月全國計算機二級c語言真題】相關文章：

全國計算機二級C語言歷年真題02-11

計算機二級C語言真題09-30

全國計算機二級考試《C語言》真題與答案09-03

2016全國計算機二級《C語言》真題練習11-07

全國計算機二級考試《C語言》真題練習及答案09-20

上半年全國計算機二級C語言考試真題11-26