2009年浙江省高中信息技術(shù)會考試卷（6）

一、程序設(shè)計(jì)題（本題有4小題，第1-3小題，每小題4分，第4小題6分，共18分）

• 1．有如下Visual Basic程序段：
  a=18：b=12
  c=（a-b）*2
  該程序段運(yùn)行后，變量c的值為

   

  。
  組卷：2引用：1難度：0.5

  解析

一、程序設(shè)計(jì)題（本題有4小題，第1-3小題，每小題4分，第4小題6分，共18分）

• 3．有如下Visual Basic程序段：
  Private Sub Command1_Click（　?。?br />Dim i As Integer,x As Integer,s As Integer
  x=10
  s=0
  i=0
  Do While i＜=x
  i=i+2
  s=s+i
  Loop
  End Sub
  問：
  （1）該程序段運(yùn)行后，變量s的值為

   

  。
  （2）循環(huán)剛退出時，變量i的值為

   

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

  解析

• 4．超市進(jìn)貨時會將每個商品的條形碼和價格輸入計(jì)算機(jī)，并對所有商品按照條形碼排序（從小到大），顧客付款時只要把條形碼輸入電腦，電腦即可根據(jù)條形碼找到該商品并顯示對應(yīng)的價格。下列程序的功能是根據(jù)條形碼查找對應(yīng)商品的價格，所有商品的條形碼和價格分別保存在數(shù)組a和b中（并且已經(jīng)按照條形碼從小到大排序），第i個商品的條形碼保存在a（i）中，對應(yīng)的價格保存在b（i）中，變量f是標(biāo)志變量，如果值為True則說明找到了商品，若為False則說明沒有找到。
  程序界面如圖1所示，在文本框Text1中輸入商品的條形碼，單擊“開始查找”按鈕（Command1）后，對應(yīng)商品的價格在標(biāo)簽Label4中顯示出來，如果未找到則顯示“找不到該商品，請重新輸入條形碼”。
  解決此問題的算法流程圖如圖2所示，相應(yīng)的程序如下，在程序①和②橫線處填入適當(dāng)?shù)恼Z句或表達(dá)式，將程序補(bǔ)充完整。
  Private Sub Command1_Click （　　）
  Dim x As String,i As Integer,j As Integer,m As Integer
  Dim f As Boolean
  x=Text1．Text
  i=1：j=n：f=False'n保存總的商品數(shù)
  Do While （i＜=j） And Not （f）
  m=Fix（（i+j）/2）
  If

   

   Then
  f=True
  ElseIf  x＜a（m） Then
  

   

  
  Else
  i=m+1
  End If
  Loop
  If f Then
  Label4．Caption=b（m）
  Else
  Label4．Caption=“找不到該商品，請重新輸入條形碼“
  End If
  End Sub
  程序中①橫線處應(yīng)填入

   

  
  程序中②橫線處應(yīng)填入

   

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

  解析