试题 试卷
题型：单选题 题类：常考题 难易度：容易
浙江省高中信息技术 算法及VB语言表达基础同步练习
Dim a(1 to 10)as integer
Pos=-1
i=1
do while i<=10
if i mod 2=0 then a(i)=i*2 else a(i)=i
i=i+1
loop
i=10
do while i>=1
if a(i)=12 then Pos=i
i=i-1
该程序段运行后，变量Pos值是（ ）
题号
1-12
13-25
26-29
30-33
科目题型
信息客观题
通用客观题
信息主观题
通用主观题
满分分值
每题2分
4/8/7/7
6/9/3/6
小李根据上述描述，设计了一个统计所有同学信息各题得分率的算法。程序运行后首先在列表框list1显示信息技术各小题得分，单击“计算”按钮“command1”，在列表框list2显示信息各题的题号和得分率，在文本框text1输出所有同学的信息平均分（平均分=各题得分率*各题分值的和）。算法的VB程序如下，回答下列问题。
彩票中心编写一个程序，功能为：随机生成7个不重复的中奖号码，并读取文件“彩票记录.txt”(该文件存储所有已售出的彩票号码)，最后根据兑奖规则输出开奖结果，运行界面示例如下：
试题篮
