2012年汨罗市五中《算法与程序设计》学业水平考试模拟试卷

高二信息技术试题卷

一、选择题：请将唯一正确答案填入答卷中，本题共20小题，每题2分，共40分。1．下面关于算法的描述，正确的是………………………………………………………（）A．算法不可以用自然语言表示 B．算法只能用框图来表示

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

D．一个算法可以有0个或多个输入，0个或多个输出

2、结构化程序设计的三种基本结构是……………………………………………………（）

A．顺序结构、选择结构、树型结构B选择结构、树型结构、循环结构

C．选择结构、赋值结构、树型结构D顺序结构、选择结构、循环结构

3．以下关于定义的语句中错误的是………………………………………………………（）

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

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

4．Len(“https://www.360docs.net/doc/c12701856.html,”)的值是………………………………………………………（）A．9 B．10 C．11 D．12

5．“高速公路上的某处有一测速拍照系统，当车速超过规定时速时，照相机启动拍照，

否则不拍照”。用算法描述照相机的工作流程，合适的算法模式是……………………（）A．顺序模式B．选择模式C．循环模式D．树型模式

6．下列可作为VB变量名的是……………………………………………………………（）A． 4*D B． A_B C． 4ABC D．Dim

7．用语句 Dim A(－3 To 5) As Integer所定义的数组的元素个数是………………（）A．6 B．7 C．8 D．9

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

①变量s的初值是0

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

③s=s+(-1)*i

④输出变量s的值

这个计算s值的算法中，s的代数式表示式…………………………………………………（）A．1－2+3－4+…+(-1)n×(n－1) B．1－2+3－4+…+(-1)n×n

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

9．表达式2^4\3的值是………………………………………………………………………（）A．5 B．6 C．7 D．8

10．如果x=-25，则运行x=Abs(x):x=Sqr(x)后，x的值是…………………………………（） A．5 B．-5 C．25 D.-25

11．在Visual Basic中，添加一个标签，在工具箱中要单击的控件是………………………（）

A ．

B ．

C ． D.

12．要实现变量M的值与变量N的值进行交换，可用语句………………………………………（） A．X=M：M=N：N=X B．M=N：N=M C．M=N D．N=M

13．VB语言中注释语句前用什么符号；关系运算符“不等于”用什么表示…………………（） A．’≠ B．: != C．’ <> D．: <>

14．在Visual Basic工程设计中，要在文本框Text1中显示“你好”，则下列操作正确的是（）（A）在Text属性名中输入“你好”（B）在Caption属性名中输入“你好”

（C）在Font属性名中输入“你好”（D）在Name属性名中输入“你好”

15．在Visual Basic代码窗口中，语句Book1.Text="Windows 操作系统"中的Book1是……（）（A）属性名（B）属性值（C）窗口名（D）对象名

16．下列控件中可用于接受用户输入文本，又可用于显示文本的是…………………………（）A．Label 控件 B. TextBox 控件 C. Image 控件 D. CommandButton 控件

17．下列关于“控件”属性的说法正确的是……………………………………………………（）A．单击窗体中的某控件，在属性窗口中的属性列表框中找到所要设置的属性，即可设置其属性值。

B．所有对象都具有同样的属性

C．控件的属性只能在设计时设置，不能在运行时修改

D．控件的每一个属性都具有同样的默认值

18.执行下面的程序段后，x 的值为…………………………………………………………（）

x=6

For i=1 To 20 Step 2

x=x+i\5

Next I

A．21 B．22 C．23 D．24

19．下列程序执行后，变量S的值为…………………………………………………………（）S=0 : N=1

Do While N<=7

S=S+N

N=N+2

Loop

A．7 B．16 C．14 D．28

20．把问题所有可能的解一一地罗列出来，并对每一个可能的解进行判断，从中挑选出符合条件的解答，这种思想的算法属于……………………………………………………………………( ) （A）排序（B）对分查找（C）解析算法（D）枚举算法

三、读程序或流程图（本题共5小题，每题4分，共20分）

1． a = 3

b = 4

a = a + b

b = b + a

Print b

该程序段运行后变量b的值是________ ２．Dim A As String，B as string , C as string

A=”456”

B=”123”

C=Val（A+B）

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

３． X=5

Y=-20

If x<0 Then y=x-3 Else y=x+3 该程序段运行后，y的值为4．S=0

For i=1 to 5 step 2 S=s+i*i

Next i

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

5．s= 0

For j = 1 To 10

If Int (j/2) = j/2 Then

‘(提示：int()函数功能为取整)

s = s + j

j = j + 3

End If

Next j

该程序段运行后s的值为___________

四、程序填空（本题共6个小题，1-5每题3分，第6题没空5分，共40分。）1．为了交换a和b两个变量中的值，请完善下列程序段

Dim a as integer, b as integer, d as integer

a=val(text1.text)

b=val(text2.text)

d=a

______________ __

_____________ __

２．下面程序的功能是：找出10以内的奇数中能被3整除的正整数，并将它们累加起来。为了实现这一目标，请完善下列程序：

X=0

For i=1 to 10 step ____

If ________ _________ then x=x+i

Next i

３．火车托运行李，根据行李的重量按下列标准收费：若不超过50千克，按每千克0.35元收费；若超过50千克，超过部分则按每千克0.5元收费。输入托运行李的重量，计算并输出托运行李

的费用。下面程序若用于实现上述目标，请完善下面程序。

Sub command1_click( )

Dim x as double

X=val(text1.text)

If x<=50 then

Text2.text= str(0.35*x)

________

Text2.text= ___________________________

Endif

End sub

４．下面的程序是计算s=1*2+3*4+5*6+7*8+9*10，把程序中划线的错误语句改正。

Sub Test5( )

Dim s As Integer

S=１

For k=1 T0 10 Step ２

S= k*(k+1)

Next k

Print(s)

End Sub

改正为：_________________________、___________________________ ５．有道写于纸上的数学题因雨水问题淋湿，有两个数字已模糊不清：（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 ________ ___________ then

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

Endif

Next y

Next x

End sub

以上程序属于______ ________算法

6.数组d(1 to 7)依次存储133，12，88，9，50，34，-7七个数，问：

(1) 对数组d进行选择法升序排序，第1趟排序完成后得到的序列是

(2）对数组d进行冒泡法升序排序，第2趟排序完成后得到的序列是