浙教版 信息技术

瓯海中学06学年第二学期高一信息技术期中试卷

算法与程序设计模块(含答案)

一、选择题（每小题3分,共60分)

1．下面关于算法的描述，正确的是（ C ）

A．算法不可以用自然语言表示

B．算法只能用框图来表示

C．一个算法必须保证它的执行步骤是有限的

D．算法的框图表示法有0个或多个输入，但只能有一个输出

2．在算法执行流程中，对于循环模式下列说法正确的是（ B ）

A．对某个情况进行判断，当结果为真时执行步骤一，否则执行步骤二

B．对某个情况进行判断，当结果为真时执行步骤一，然后再次判断这个情况，依次类推直到结果为假时结束。

C．仅用循环模式就可以用来判断某个输入的数时不是正数

D．循环模式中可以嵌套选择模式，而选择模式中不能嵌套循环模式

3．一个漂亮的酒杯被摔碎了，则漂亮、酒杯、摔、酒杯被摔碎了分别代表的是（ C ）

A．对象，属性，事件，方法 B．对象，属性，方法，事件

C．属性，对象，方法，事件 D．属性，对象，事件，方法

4．表达式abs(－3.6)*sqr(100)的值是（ D ）

A．－360 B．360 C．－36 D．36

5．以下语句中错误的是（ C ）

A．Const var1=123 B．Dim var2 As String

C．x+y=9 D．Dim d(1 to 500) As Double

6．下列数据类型中，占用内存最小的是（ B ）

A．Boolean B．Byte C．Integer D．Double

7．数学表达式｜x-31｜对应的ＶＢ表达式是（ C ）

A．Sqr(x-31) Ｂ．Val(x-31) C．Abs(x-31) D．Str(x-31)

8．控制工具箱中的工具是（ D ）

A．文件列表 B．单选按钮 C．图片框 D．标签

9．Len(“Friend”)的值是（ A ）

A．6 B．7 C．8 D．9

10．能完全正确表示“year是闰年”的逻辑表达式是 （ C ）

A． year mod 4=0

B． year mod 400=0

C．(year mod 400=0) or (year mod 4=0) and (year mod 100<>0)

D．(year mod 400=0) and (year mod 4=0) or (year mod 100<>0)

211．如果x >5，那么y=2x，否则y=x+1。下面表述正确的语句是（ C ）。

2 A．If x>5 Then y=2x Else y=x+1 B． If x>5 Then y=x*x+1 Else y=2*x

C．If x>5 Then y=2*x Else y=x*x+1 D． If x<5 Then y=x*x+1 Else y=2*x

12．设a=2，b=3，c=4，d=5，表达式a>b and c<=d or 2*a>c的值是（ B ）

A．True B．False C．－1 D．1

13．下列可作为VB变量名的是（ B ）

A． 4*D B． A_B C． 4ABC D．A+B

浙教版 信息技术

14．用语句 Dim A(－3 To 5) As Integer所定义的数组的元素个数是（ D ）

A．6 B．7 C．8 D．9

15．将文本框Text2内输入的字符数据“abc”送到字符型变量n中，应使用的语句是（ B ）

A．n=text B．n=text2.text C．n=val(text2) D．n=val(text2.text)

16．下图所示的流程图片断，时反映某班下课的流程。

它的控制模式属于（ C ）

A．循环模式 B．树型模式 C．分支模式 D．顺序模式

17．佳佳的爷爷有一张长为L米、宽为H米的铁皮，配上底（用另外一张铁皮裁成）想做成一个高为H米的圆柱形触物桶。计算体积V的步骤有：

① 电脑屏幕显示文字：“请输入长和宽”

② 计算底半径并赋值给变量R

③ 接收输入的数据赋值给变量L

④ 接收输入的数据赋值给变量H

⑤ 输出文字：“触物桶的体积是”

⑥ 计算体积并赋值给变量V

⑦ 输出：V的值

上面步骤组织成一个计算体积V的算法，其正确的次序是 （ B ）

A．①②③④⑤⑥⑦ B．①③④②⑥⑤⑦

C．①②③④⑥⑤⑦ D．①③④②⑦⑤⑥

18．如下图所示的流程图片断

上述流程图执行过后，A、B的值分别为 （ D ）

A．A是20，B是30 B．A 是20，B是20

C．A是30，B是30 D．A是30，B是20

19．下面是一段关于计算变量s的算法：

①变量s的初值是0

②变量i从1起循环到n，此时变量s的值由下面的表达式计算

③s=s+(-1)*i

④输出变量s的值

这个计算s值的算法中，s的代数式表示式 （ D ）

nnA．1－2+3－4+ +(-1)×(n－1) B．1－2+3－4+ +(-1)×n

C．1+2+3+4+ +(n－1)+n D．－1－2－3－ －n

浙教版 信息技术

20．如下图的流程图

则最后变量c输出的值是 （ A ）

A．2 B．－1 C．1 D．6

二、程序设计题（本题7小题，每个空格4分，共40分。）

1．有如下程序段：

Dim A As String

Dim B As String

Dim C As Sting

A=”456”

B=”123”

C=Val（A+B）

该程序段运行后，C的值为 456123

2．有如下程度段：

X=5

Y=-20

If Not x>0 Then x=y-3 Else y=x+3

该程序段运行后，y的值为 8

3．有如下程序段:

S=0

For i=1 to 5

S=s+i*i

Next i

该程序段运行后，S的值为 55

４．下面程序的功能是：找出10以内的奇数中能被3整除的正整数，并将它们累加起来。为了实现这一目标，程序中划线处的语句应更正为_______i mod 3=0__________

X=0

For i=1 to 10 step 2 If i mod 2=0 then x=x+i

Next i

５．火车托运行李，根据行李的重量按下列标准收费：若不超过50千克，按每千克0.35

元收费；若超过50千克，超过部分则按每千克0.5元收费。输入托运行李的重量，计算并输出托运行李的费用。下面程序若用于实现上述目标，则划线处的语句应更改为_____str((x-50)*0.5+50*0.35)_________。

浙教版 信息技术

Sub command1_click( )

Dim x as double

X=val(text1.text)

If x<=50 then

Text2.text= str(0.35*x)

Else Text2.text= str(0.5*x)

Endif

End sub

程序填空

6．有道写于纸上的数学题因雨水问题淋湿，有两个数字已模糊不清：

（3□+42）×6＝46□

某同学为了找出这两个数，编写了下列Visual Basic程序：

Sub command1_click( )

Dim x as integer,y as integer

For x=0 to 9

For y=0 to 8 step 2

If _72*6+x*6=460+y_ then

List1.additem ”(3”& str(x)&”+42)*6=46”&str(y)

Endif

Next ___y____

Next ____x____

End sub

7.个位数字是6，且能被3整除的3位数共有多少个？下面程序用于解决这一问题，在划线处填入合适的语句或表达式，完成程序。设共有n个这样的数，Visual Basic程序如下：

Sub command1_click( )

Dim i as integer,n as integer

m=106:n=0

do while m<=996

if m mod 3=0 then _______n=n+1________

m=m+10

loop

text1.text=______str(n)____

End sub