2011年浙江省高中信息技術會考試卷（13）

一、選題題（算法）

• 1．將數(shù)學表達式

  1

  2

  sinxcosx（x的單位：弧度）寫成Visual Basic表達式，正確的是（　　）

  A．SinxCosx/2	B．Sinx*Cosx/2
  C．Sin（x）Cos（x）/2	D．Sin（x）*Cos（x）/2
  組卷：7引用：2難度：0.9

  解析

• 2．在Visual Basic中，下列能作為變量名的是（　?。?/h2>

  A．x+1

  B．x_1

  C．Or

  D．If
  組卷：2引用：2難度：0.9

  解析

• 3．在Visual Basic中，用變量存儲560位學生的身高數(shù)據(jù)（如：1.76），下列最合適的變量說明是（　?。?/h2>

  A．將560個變量說明為整數(shù)型

  B．將560個變量說明為單精度實數(shù)型

  C．將一個元素個數(shù)為560的一維數(shù)組說明為整數(shù)型

  D．將一個元素個數(shù)為560的一維數(shù)組說明為單精度實數(shù)型
  組卷：8引用：3難度：0.9

  解析

二、填空部分

• 10．角谷猜想。對任意一個大于1的正整數(shù)n,進行如下運算：若n是奇數(shù)時，n的值替換為3n+1，若n是偶數(shù)時，n的值替換為n/2；重復以上運算，n最終變?yōu)?．
  下面程序用于驗證角谷猜想，程序運行界面如圖1所示。在文本框Text1中輸入一個正整數(shù)，單擊“驗證”按鈕Command1，在列表框List1中輸出每一步的運算過程。
  解決此問題的算法流程圖如圖2所示：
  程序代碼如下：
  Private Sub Command1_Click （　?。?br />Dim n As Single,i As Integer
  n=Val（Text1．Text）
  List1．Clear'清除列表框List1中的內(nèi)容
  If Int（n）＜＞n Or n＜=1Then
  List1．AddItem“請輸入大于1的正整數(shù)！“
  Else
  i=0
  Do While

   

  
  If n Mod 2=0Then
  n=

   

  
  Else
  n=n*3+1
  End If
  i=i+1
  List1．AddItem Str（i）+““+Str（n）
  Loop
  End If
  End Sub
  （1）解決此問題的算法是

   

  。（填：解析算法/對分查找）
  （2）在程序①和②橫線處，填入適當?shù)恼Z句或表達式，把程序補充完整：
  程序中①橫線處應填入

   

  。
  程序中②橫線處應填入

   

  。
  組卷：0引用：1難度：0.1

  解析

三、操作題

• 11．打開考生文件夾下“VB”文件夾中的“test.jye.ai”，該VB程序的功能是：單擊“開始”按鈕Command1，小熊開始“滑冰”；單擊“停止”按鈕Command2，“滑冰”動作停止；單擊“結束”按鈕Command3，結束并退出程序。程序運行界面如圖所示：
  完成以下操作：
  （1）將命令按鈕Command3的Caption屬性值設置為“結束”；
  （2）為“停止”按鈕Command2添加Click事件過程，并將“VB”文件夾下“code.jye.ai”文件中的所有代碼復制到該事件過程中。調試程序正確，并保存窗體文件test。frm和工程文件test。vbp。
  組卷：0引用：1難度：0.6

  解析