2009年浙江省高中信息技术会考试卷（10）

四、程序设计题（本题有4小题，第1-3小题，每小题4分，第4小题6分，共18分）

• 1．有如下Visual Basic程序段：
  a=“Test“
  b=“is“
  c=“easy“
  c=a+b+c
  该程序段运行后，变量c的值为

   

  ．
  组卷：4引用：1难度：0.9

  解析

四、程序设计题（本题有4小题，第1-3小题，每小题4分，第4小题6分，共18分）

• 3．有如下Visual Basic程序段：
  Dim a（1To 10）As Integer,i As Integer,m As Integer
  m=a（1）
  i=2
  Do While i＜=10
  If m＜a（i） Then m=a（i）
  i=i+1
  Loop
  已知数组a中a（1）、a（2）、…、a（10）保存的数值分别为：56、32、12、24、77、89、90、7、3、11，问：
  （1）循环刚退出时，变量i的值为

   

  。
  （2）该程序段运行后，变量m的值为

   

  。
  组卷：0引用：1难度：0.5

  解析

• 4．团体总分统计。下列程序的功能是根据输入的班级编号，统计该班的团体总分。每个运动员的编号、所属班级编号、得分情况分别保存在数组a、b、c中，a（i）保存第i位运动员的编号，b（i）保存第i位运动员所属班级编号，c（i）保存第i位运动员得分。
  程序界面如图VB-1所示，在文本框Text1中输入班级编号，单击“开始统计”按钮（Command1），程序统计该班的团体总分并在文本框Text2中显示。
  解决此问题的算法流程图如图VB-2所示，相应的程序如下，程序中变量n表示总的运动员人数，在程序①和②横线处，填入适当的语句或表达式，把程序补充完整。
  Private Sub Command1_Click （　　）
  Dim x As String,i As Integer,s As Integer
  x=Text1．Text
  s=0
  For i=1To n
  If ①         Then
  s=s+c（i）
   ②         
  Next i
  Text2．Text=Str（s）
  End Sub
  程序中①横线处应填入

   

  
  程序中②横线处应填入

   

  
  
  组卷：1引用：1难度：0.1

  解析