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

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

• 1．有如下Visual Basic程序段：
  m=10
  n=m*2
  t=m*n
  該程序段運(yùn)行后，變量t的值為

   

  ．
  組卷：2引用：1難度：0.9

  解析

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

• 3．以下Visual Basic程序的功能是：計(jì)算表達(dá)式1-2+3-4+5-6+…+99-100的值，并在文本框Text1中輸出計(jì)算結(jié)果。
  Private Sub Command1_Click （　　）
  Dim i As Integer,s As Integer
  s=0
  i=1：t=1
  Do While i＜=100
  s=s+ i
  t=-t
  i=i+1
  Loop
  Text1．Text=Str（s）
  End Sub
  問(wèn)：
  （1）循環(huán)剛退出時(shí)變量i的值是

   

  。
  （2）為了實(shí)現(xiàn)上述表達(dá)式的計(jì)算，程序中橫線處的表達(dá)式應(yīng)更正為

   

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

  解析

• 4．COD（化學(xué)需氧量）是衡量水質(zhì)污染程度的重要指標(biāo)之一，污水處理時(shí)根據(jù)污水的COD指標(biāo)來(lái)計(jì)算COD去除劑的投放量。
  程序界面如圖所示，在文本框Text1中輸入COD指標(biāo)，單擊“計(jì)算投放量”按鈕（Command1）后，程序根據(jù)COD指標(biāo)計(jì)算出合適的COD去除劑投放量，并在標(biāo)簽Label3中輸出計(jì)算結(jié)果。
  污水處理廠根據(jù)COD指標(biāo)投放COD去除劑的標(biāo)準(zhǔn)如下表所示：
  

  當(dāng)前COD指標(biāo)x	根據(jù)COD指標(biāo)應(yīng)投放COD去除劑的劑量
  x＜50	10
  x≥50  并且  x≤500	1 . 2 x 5
  x＞500	1 . 5 x 4

  在程序①和②橫線處填入適當(dāng)?shù)恼Z(yǔ)句或表達(dá)式，將程序補(bǔ)充完整。
  Private Sub Command1_Click （　　）
  Dim x As Single,s As Single
  x=Val（Text1．Text）
  If

   

   Then
  s=10
  ElseIf x＜=500Then
  s=

   

  
  Else
  s=x/4*1.5
  End If
  Label3．Caption=Str（s）
  End Sub
  程序中①橫線處應(yīng)填入

   

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

   

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

  解析