廣東省信息技術等級考試試題及答案

四、操作題：

選修模塊“算法與程序設計”等級考試試題

考試時間：90分鐘    滿分：100分    

說明：.本卷分為第一卷和第二卷兩部分，共5頁。第一卷為單項選擇題、判斷題和填空題，第二卷為操作題。單項選擇題18題（20個空），每空2分，共40分；判斷題15題，每小題1分，共15分，填空題（讀程序?qū)懡Y(jié)果）2題，每小題5分，共10 分；操作題（程序設計）2題，第一題15分，第二題20分，共35分。

注意：做完第一卷并提交完成后才能開始做第二卷。

第一卷（4頁）

一、 單項選擇題（共20個空，每空2分，共40分）

1、 人們利用計算機解決問題的基本過程一般有如下五個步驟（①~⑤），請按各步驟的先后順序在下列選項（A~D）中選擇正確的答案（    ）

①調(diào)試程序 ②分析問題 ③設計算法 ④構建數(shù)學模型 ⑤編寫程序

（A）①②③④⑤  （B）②④③⑤①  （C）④②③⑤①  （D）②③④①⑤

2、 下列各種基本數(shù)據(jù)類型說明符中表示整數(shù)型的是（    ）

（A） Integer    （B） Boolean    （C） Single     （D） String

3、 下列各項中，合法的變量名是（    ）

（A） &90     （B） abc=9   （C） hello     （D） 888.f

4、 有兩個條件P 、Q，只要有一個條件為真時，結(jié)果一定為真的是（    ）。

（A）Not P     （B）P And Q  （C）P OR Q    （D）NOT P AND NOT Q

5、 下列代數(shù)式的Visual Basic表達式是（    ）

（A）(x^5-cos(29*3.14/180))/(sqr(exp(x)+log(y) +5))

（B）(x^5-cos(29))/(sqr(exp(x)+ln(y))+5)

（C）(x^5-cos(29*3.14/180))/(sqr(exp(x)+ln(y))+5)

（D）(x^5-cos(0.506))/(sqr(exp(x)+log(y))+5)

6、 在VB中，表達式（18+25/3）Mod 5 的值是（    ）。

（A）0     （B）1    （C）2    （D）3

7、 VB函數(shù)InStr ()檢查是否包含另一子串：含有子串則返回值為子串在父串中第一次出現(xiàn)的位置，不包含子串則返回值為0。InStr("CATbCACBC", "BC")的值為（    ）

（A）0     （B）4    （C）8    （D）1

8、 VB函數(shù)Right ()從字串右端取部分字串：將某一字串從結(jié)尾開始取固定長度的字串。Right(“Visual Basic 6.0”,6)的值為（    ）

（A）sic 6.0     （B）asic 6.0    （C）Visual    （D）ic 6.0

9、 程序如下：

k=－20

  do while  (k=0)

k=k+1

  loop

  以下說法正確的是（    ）

（A）do while 語句執(zhí)行了20次；  （B） While 循環(huán)是無限循環(huán)

（C）循環(huán)體語句一次也不執(zhí)行   （D） 循環(huán)體語句執(zhí)行一次

10、 VB中將兩個字符串連接起來的運算符有：+和&，那么 ”123”+45結(jié)果是（    ）

　?。ˋ）168     （B）12345    （C）“123”    （D）45

11、 已知A，B，C，D是簡單變量，且都已有互不相同的值，執(zhí)行語句B=8:A=C:D=A:D=B后，其值相等的變量是（    ）

　?。ˋ）A，D     （B）A，C     （C）C，B    （D）B，A

12、 要交換變量A和B之值，應使用的語句組是（    ）

　　（A）A=B:B=C:C=A     （B）C=A:A=B:B=C   （C）A=B:B=A  （D）C=A:B=A:B=C

13、  模塊化程序設計方法主要通過（    ）來實現(xiàn)。

（A）遞歸算法和遞歸程序     （B）過程和函數(shù)的定義和調(diào)用

（C）程序的循環(huán)結(jié)構         （D）對象

14、 在窗體上畫一個命令按鈕，然后編寫如右方所示事件過程。程序運行后，單擊命令按鈕，程序打印的結(jié)果為（    ）

（A）76     （B）10   

（C）72     （D）48

Private Sub Command1_Click()

  Dim I As Integer, j As Integer, x As Integer

      x = 4

      For I = 1 To 4

        For j = 1 To 3

          x = x + 6

        Next j

  Next I

      Print x

End Sub

15、 在窗體上畫一個命令按鈕，然后編寫如右方所示事件過程。程序運行后，單擊命令按鈕，依次在輸入對話框中輸入5、4、3、2、1、-1，則輸出結(jié)果為（    ）

（A）2      （B）3   

（C）14     （D）15
 
Prevate Sub Command1_Click()

　Dim a as integer,b as integer, x as integer

　　　x=0

　　　Do Until x=-1

　　　　a = InputBox(“請輸入A的值”)

　　　　a = Val(a)

　　　　b = InputBox(“請輸入B的值”)

　　　　b = Val(b)

　　　　x = InputBox(“請輸入x的值”)

　　　　x = cint(x)

　　　　a = a+b+x

　　　Loop

　　　Print a

End Sub

16、 在窗體上畫一個文本框（其中Name屬性為Text1），然后編寫如右方所示事件過程。運行程序的結(jié)果是（    ）

（A）在文本框Text1中輸出aaa

（B）在文本框Text1中輸出55

（C）編譯錯誤

（D）在文本框Text1中沒有輸出

Private Sub Form_Load()

  Dim i As Integer, sum As Integer

    Text1.Text = "aaa"

    For i = 1 To 10

        sum = sum + i

    Next i

    Text1.Text = sum

End Sub