vb试题2

选择题

1.“苏州公共自行车通”是一款基于安卓平台的实用手机软件，用户可以用他来查询当前某个公共自行车站点的自行车情况，是否有空闲自行车，空闲自行车的数量由自行车的后台连网的管理平台随时更新，如果用n来表示空闲自行车的数量，下面是截取出来的一段代码，请你阅读并完成：

Dim x As Integer

Dim n As Integer

…

If then

Image 1.picture=loadpicture(“恭喜，本站有车！”)

Else

Image 1.picture=loadpicture(“很遗憾，本车已经借光！”)

End if

…

A. n>1

B. n=0

C. n>=1

D.n=1

1.参考答案 C. n>=1 本题的命题意图是学生对程序段的阅读，考察学生的建模能力，即能否将课本学到的知识迁移应用到现实生活中，也就是说本题意图是考察学生迁移应用的信息素养，本题其实并不难，跟课本上的猜币程序是一个类型的，只要学生能够从根本上理解课本上例题的思想，本题就很好解决。

2.在学习三角形的章节中，数学老师想编写这样一个软件，只要输入任意三个数值，系统就自动判断能否构成三角形，如果可以构成，就输出三角形的周长，你能帮他解决这个问题吗？

Dim a As Integer

Dim b As Integer

Dim c As Integer

Dim n As Integer

a=inputbox(“请输入边长a”,“输入数据”)

b=inputbox(“请输入边长b”,“输入数据”)

c=inputbox(“请输入边长c”,“输入数据”)

if then

label1.caption=”您输入的数据能构成三角形！”

n=a+b+c

print “三角形的周长为：”；n

else

label2.caption=”您输入的数据不能构成三角形！”

A. a-b

B. c>a-b and c

C. c>a-b or c

D. not( c>a-b and c

参考答案 B. c>a-b and c

本题的命题意图是学生对程序段的阅读，考察学生用程序设计的思想来解决数学问题的能力，本题实质上考察的就是数学知识中，构成三角形的条件：两边之和大于第三边。如何用vb语言来描述这一表达式，是考察的第1个知识点，第2个知识点考察的是逻辑表达式的运算，能否将课本学到的知识迁移应用到现实生活中，也就是说本题意图是考察学生迁移应用的信息素养。

3.阅读如下的代码段，并写出结果：

let a=20

let b=20

not(a>10 and a< 30 or b>10)

A. true

B. false

C. null

D.以上都不是

参考答案A. true

本题的命题意图是学生对程序段的阅读，以及对复杂的关系表达式的运算，第一个知识点考查的是逻辑运算的优先次序，第二个知识点考察的是逻辑表达式的值。

4.元旦晚会有这样一个游戏，主持人从1-100内任意抽一张卡片，猜的人报数，如果大了主持人说大了，小了就说小了，如何用程序来模拟这个游戏呢，请你来完善。

…

A=int(100*Rnd+1)

B=val(x)

If then

Label1.caption=”猜对啦”

Else

Cc

End if

….

A. a=b

B. a>b

C. a

D. 以上都不对

1.参考答案 A. a=b 本题的命题意图是学生对程序段的阅读，考察学生的建模能力，即能否将课本学到的知识迁移应用到现实生活中，也就是说本题意图是考察学生迁移应用的信息素养，本题其实并不难，跟课本上的猜数程序是一个类型的，只要学生能够从根本上理解课本上例题的思想，本题就很好解决。

编程题：

1.“中国好声音”最近很受大家关注，比赛的评分规则如下：一共10位评委，采用百分制打分，选手的成绩是去掉一个最高分，去掉一个最低分，剩下的成绩求平均数，请你帮助栏目组编写程序，自动求选手的成绩。

Dim max as integer

Dim min as integer

Dim N as integer

Dim sum as integer

Let max=0

Let min =100

Let sum=0

For I= 1

N=val(text1.text)

If n>max then

2

or

n

3

Sum=sum+N

Sum= 4

Print(“该选手的成绩是”，Sum)

参考答案

1. 1 to10

2. max=N

3. min=N

4. (Sum-max-min)/8

命题意图：表达式的综合应用

2.物理学上有个小球弹跳的程序，小球从100米高空坠落，每次弹起的高度是他下落高

度的一半，求经过50次之后，小球经过的路程是多少？请完成程序。

…

Let h=100 ’定义初始高度

Let N=0 ’定义弹跳次数

For 1 ’变量的范围Let 2 ’每次下落的高度

Let n=n+1

Let 3 ’总共走过的路程Next I

…

Print “弹起次数n”；n

Print “经过路程sum”；sum

参考答案

1.I= 1 to 50

2. s=h/2

2.Sum=h+s

命题意图：表达式的综合应用, 函数表达式的理解。