浙江省 2009 年高中信息技术会考(6 月卷)
2009 年 6 月高中信息技术会考
算法与程序设计题(第一套)
四、程序设计题(本题有 4 小题,第 1-3 小题,每小题 4 分,第 4 小题 6 分,共 18 分)
1. 有如下 Visual Basic 程序段:
m = "VB"
n = "is"
t = "easy"
t = m + n + t=" VBiseasy"
该程序段运行后,变量 t 的值为_____"VBiseasy"______。
2. 有如下 Visual Basic 程序段:
a = 23
b = 34
If a > b Then
Label1.Caption = "a>b"
Else
Label1.Caption ="a<=b" // 如果 Label1.Caption =a<=b 显示的是 true
End If
该程序段运行后,在标签 Label1 上显示的是____ a<=b ________。
3.以下 Visual Basic 程序的功能是:计算表达式 1×3+2×3+3×3+…100×3 的值,并在文本
框 Text1 中输出计算结果。
Private Sub Command1_Click()
Dim i As Integer, s As Integer
s = 0
i = 1
Do While i <= 100
s =s+ i * 3
i = i + 1=101
Loop
Text1.Text = Str(s)
i=100
End Sub
问:
(1)刚退出循环时,变量 i 的值是_____101_______。
( 2 ) 为 了 实 现 上 述 表 达 式 的 计 算 , 程 序 中 划 线 处 的 表 达 式 应 更 正 为 _
____s+i*3_______。
4.某市出租车计费标准规定:出租车启动后行程不超过 3 千米(包含 3 千米)计费 5 元;
如果行程超过 3 千米且不超过 10 千米(包含 10 千米),则超过 3 千米部分按 1.5 元/千
米计费(3 千米及以内部分计费仍为 5 元);若行程超过 10 千米,则在前面计费基础上,
超出 10 千米部分按 1.8 元/千米计费。
假定某出租车行程为 x 千米,计费标准如下:
当 x≤3 千米时,计费为 5 元;
当 3<x≤10 千米时,计费为 5+(x-3)×1.5
第 1 页 共 24 页