2015年计算机试题

1.1 计算机解决问题的过程

一、单项选择题

1.利用计算机解决问题的过程中，“找出已知和未知，明确它们之间的关系，列出数学表达式”属于以下哪一个步骤（）。

A.设计算法

B.分析问题

C.编写程序

D.调试运行程序

答案

2.要进行元旦晚会比赛，学校请你设计一个能够对元旦晚会节目分数自动排序的软件，你接到任务后，准备开始设计此软件，比较好的方法和步骤是？（）。

A.设计算法，编写程序，提出问题，调试程序

B.分析问题，编写程序，设计算法，调试程序

C.分析问题，设计算法，编写程序，调试程序

D.设计算法，提出问题，编写程序，调试程序

答案

3.程序编好以后，计算机无法检查出来的错误是？（）。

A. 编译错误

B. 执行错误

C. 逻辑错误

D. 语法错误

答案

1.2 算法和算法的描述

一、单项选择题

1.以下不是算法特征的是（）。

A.有穷性

B.确定性和可行性

C.输入和输出

D.高效

答案

2.在流程图的基本图形中，菱形表示（）。

A.开始/结束

B.输入/输出

C.处理

D.判断

答案

3.以下说法正确的是（）。

A. 算法就是程序

B. 数据结构就是程序

C. 算法+数据结构=程序

D. 算法就是解决问题的方法

答案

二、简答题

4.分别用算法的三种描述方式描述下列：某图书城书籍促销，一次购买100元以上书籍8折，100元以下9折。

提示

5.阅读程序框图，若输入m=4，n=3, 则输出a= ，i= 。

提示

1.3 程序与程序设计语言

单项选择题

1. 在下面给出的各项中，属于机器语言的是（）。

A. x=10+1

B. 011011 000000 000000 000001 110101

C. CLA 00 017

D. X=X+1

答案

2.程序设计语言的发展经历了从（）→汇编语言→高级语言的过程。

A. 自然语言

B. 机器语言

C. C语言

D. 低级语言

答案

3.编译方式是先（），再执行。

A. 翻译整个程序

B. 逐句翻译

C. 翻译一条执行一条

D. 直接执行

答案

4.不属于程序三种基本结构的是（）。

A. 顺序结构

B. 选择结构

C. 循环结构

D. 数据结构

答案

5.“下雨在体育馆上体育课，不下雨则在操场上体育课”，用算法描述这一问题，合适的算法结构是（）。

A. 顺序结构

B. 选择结构

C. 循环结构

D. 数据结构

答案

2.1 VB语言及程序开发环境

一、单项选择题

1.以下哪个是合法的变量名（）。

A. Len

B. Test@qw

C. 6cost_1

D. count2s

答案

2.双击窗体中的对象后，Visual Basic将显示的窗口是（）。

A. 工程窗口

B. 工具箱

C. 代码窗口

D. 属性窗口

答案

3.VB提供控件的窗口是（）。

A. 工具栏

B. 布局窗口

C. 工具箱

D. 属性窗口

答案

4.在VB集成开发环境中，单击工具栏中的（启动）按钮可以进入（）。

A. 设计模式

B. 运行模式

C. 中断模式

D. 设计代码模式

答案

5.在VB集成开发环境中，若不小心关闭了工程窗口，可依次点击菜单栏的（）重新打开。

A. “编辑”—>“工程资源管理器”

B. “视图”—>“工程资源管理器”

C. “工程”—>“工程资源管理器”

D. “格式”—>“工程资源管理器”

答案

二、填空题

6.“根据圆的面积求其周长”程序的界面和代码如下图所示（s代表圆的面积、r代表圆的半径、c代表圆的周长）：

回答如下问题：

（1）根据VB程序的基本组成，程序代码缺少部分；该部分的代码应为。

（2）请定义一个符号常量pi 代表圆周率3.141592653：

。

（3）请根据算法提示补充完整计算圆的半径和周长的代码(圆周率用第（2）小题的pi表示)：r= 。

c= 。

答案

7.“变量演示程序”的程序界面及代码如下图所示：

将“a=100”按下表中“代码”列的要求依次修改，应该如何修改变量类型说明语句才能使程序正常运行并得到预计结果？

序

代码预计结果如何修改类型说明语句？

号

1a=100102Dim a as integer

2a=5000050002

3a=100.89102.89

4a=#2010-4-22#2010-4-24

5a="china中国"

6a=true

（1）第5行a="china中国"正确定义后程序仍不能正常运行的原因是：。

（2）从第6行的代码运行结果观察，true在计算机中用表示，false用表示。

答案

8.请计算表达式1+3*4 mod 15/3-2^3+14\9/3的值。

提示

9.请将数学公式翻译成对应的VB表达式。

提示

2.2 程序的顺序结构

一、单项选择题

1.执行以下程序，在弹出的第1个输入框输入“10”，第2个输入框输入“15”,则输出的结果为（）。

Dim a As Integer, b As Integer

a = InputBox("输入","a=")

b = InputBox("输入","b=")

Print a; "+";b; "=",a+b

A. a+b=25

B. 10+15=25

C. a+b=25

D. 10+15=25

答案

2.已知A，B，C，D是整型变量，且都已有互不相同的值，执行语句“B=8：A=C：D=A；D=B”后，其值相等的变量是（）。

A. A，D

B. A，C

C. C，B

D. B，A

答案

3.要交换变量A和B之值，应使用的语句组是（）。

A. A=B：B=C：C=A

B. C=A：A=B：B=C

C. A=B：B=A

D. C=A：B=A：B=C

答案

二、填空题

4.有如下Visual Basic程序段：

m = "VB"

n = "is"

t = "easy"

t = m + n + t

该程序段运行后，变量t的值为。

答案

2.3 程序的选择结构

一、单项选择题

1.判断x是否在区间（a, b]上，在VB中以下哪个逻辑表达式是正确的？（）。

A.a

B.a

C.a

D.a>x And x<=b

答案

2.设a=2,b=3,在VB中，表达式a>b or b>=3的值是（）。

A.false

B.true

C.-1

D.1

答案

3.执行以下程序段后，整型变量c的值为（）。

a=24

b=328

select case b\10

case 0

c=a*10+b

case 1 to 9

c=a*100+b

case 10 to 99

c=a*1000+b

end select

A.537

B.2427

C.24328

D.240328

答案

二、多选题

4.下面是判断变量X是不是能被5整除的偶数的程序，横线上的逻辑表达式应为（）。

Dim x as Integer

X=Val(Text1.text)

If____________then

Label1.Caption="这个数是能被5整除的偶数"

Else

Label1.Caption="这个数不是能被5整除的偶数"

End if

A.(x mod 5)=0 and (x mod 2)=0

B.x mod 10=0

C.x mod 5=0

D.x mod 2=0

答案

三、填空题

5.某市出租车计费标准规定：出租车启动后行程不超过3千米（包含3千米）计费5元；如果行程超过3千米且不超过10千米（包含10千米），则超过3千米部分按1.5元/千米计费（3千米及以内部分计费仍为5元）；若行程超过10千米，则在前面计费基础上，超出10千米部分按1.8元/千米计费。

假定某出租车行程为x千米，计费标准如下：

当x≤3千米时，计费为5元；

当3

当x>10千米时，计费为5+（10-3）×1.5+(x-10)×1.8

解决此问题的算法流程图如图所示，相应的Visual Basic程序如下，在程序①和②画线处，填入适当的语句或表达式，把程序补充完整。

Private Sub Command1_Click()

Dim x As Single, s As Single

x = InputBox("输入","请输入行程")

If _____①_____ Then

s = 5

Else

If x <= 10 Then

s = 5 + (x - 3) * 1.5

Else

________②_________________

End If

End if

Print s

End Sub

程序中①画线处应填入

程序中②画线处应填入

答案

四、编程题

6.在“神州号”程序中，我们只判断了飞船成功飞行的条件。当飞船速度继续加大时，飞船将

达到第二宇宙、第三宇宙速度……（见下表）。

试编写程序，输入不同的飞船速度，判断它的各种飞行状况。

飞船速度（ V）单位（km/s）飞行状况

7.91<=V<11.19飞船绕地球似做匀速圆周运动

11.19<=V<16.67飞船离开地球的控制 ,围绕太阳转

V>=16.67飞船挣脱太阳引力飞出太阳系

答案

2.4 程序的循环结构

一、判断并改错

1.阅读以下程序段，请判断是否有误并修正。

For j = 50 To 1 Step 2 ' 程序运行结果：实现50到1的所有偶数的输出

Print j

Next a

答案

2.阅读以下程序段，请判断是否有误并修正。

i = 1 ' 程序运行结果：实现1到5的输出

Do While i <= 5

Print i

Loop

答案

3.阅读以下程序段，请判断是否有误并修正。

for i=1 to 5 step 1

for j=1 to 10 step 1

print i+j

next i

next j

答案

二、读程序写结果

4. For I = 1 To 20 Step 1

Print I,

If I Mod 5 = 0 Then

Print

End If

Next I

答案

5. s = 10

For i = 1 To 5 Step 1

j = i * 2

s = s + j

Next i

Print i, s

答案

6.

i = 1

Do While i <= 5 Print i

i = i + 1 Loop i = 1

Do While i <= 5

i = i + 1

Print i

Loop

i = 1

Do

Print i

i = i + 1

Loop Until i <= 5

i = 1

Do

Print i

i = i + 1

Loop Until i >= 5

答案

7. For i = 1 To 3 Step 1

For j = 1 To 4 Step 1

Print i; "+"; j,

Next j

Print

Next i

答案

三、程序填空

8.用户输入一个大于3的正整数m，程序判断该数是否为素数。

Private Sub command1_click()

Dim m As Integer

Dim i As Integer

m = InputBox("请输入一个数：")

i = 2

Do Until __①___

i = i + 1

Loop

If __②_ Then Print m; "不是素数" Else Print m; "是素数"

答案

2.5 模块化程序设计

一、单项选择题

1.下列自定义函数正确的是（）。

A．Public Function area(a as integer,b as integer,c as integer) as single

P=(a+b+c)/2

area=sqr(p*(p-a)*(p-b)*(p-c))

End function

B. Public Function area(a as integer,b as integer,c as integer) as single

P=(a+b+c)/2

S=sqr(p*(p-a)*(p-b)*(p-c))

End

C. Public Function area(a as integer,b as integer,c as integer) as single

P=(a+b+c)/2

S=sqr(p*(p-a)*(p-b)*(p-c))

End function

D. Public Function area(a as integer,b as integer,c as integer) as single

P=(a+b+c)/2

S=sqr(p*(p-a)*(p-b)*(p-c))

End function

答案2.已知利用海伦公式求三角形面积的过程如下：

Private sub area(a as integer,b as integer,c as integer,s)

P=(a+b+c)/2

S=sqr(p*(p-a)*(p-b)*(p-c))

End sub

下列调用该过程正确的是（）。

A. area(3, 4, 5, s)

B. area 3, 4, 5, s

C. area(3.1, 4.2, 5,5, s)

D. area 3.1, 4.2, 5.5, s

答案

二、简答题

3.什么是“自顶向下、逐步求精”程序设计思想，其优点有哪些？

提示4.模块化程序设计思想的优点是什么？

提示

3.1 可视化编程的概念与方法

单项选择题

1.在Visual Basic工程设计中，双击窗体中的对象后，出现的是（）。

A.工程窗口

B.工具箱

C.代码窗口

D.属性窗口

答案

2.在Visual Basic代码窗口中，语句Student.Font="宋体"中的Student是（）。

A.对象名

B.属性名

C.属性值

D.窗口名

答案

3.在Visual Basic代码窗口中，语句Old. Caption="78"中的78是（）。

A.对象名

B.属性名

C.属性值

D.窗口

答案

4.要使一个命令按钮显示文字“确定”，正确的设置是把该命令的（）。

A.属性Font设置为“确定”

B.属性.Fore Color设置为“确定”

C.属性Caption设置为“确定”

D.属性Border Style设置为“确定”

答案

3.2 程序调试的方法

在程序设计过程中经常出现四种类型的错误：编辑错误、编译错误、运行错误和逻辑错误。请完成下面的题目，体验各种错误类型。(点击这里打开素材)

1.打开素材中的文件夹“1”，修改程序中编辑时的错误，实现输入一个三位数，然后将其反向输出。

答案

2.打开素材中的文件夹“2”，请修改程序中编译时的错误，实现用户登录程序。

答案

3.打开素材中的文件夹“3”，请修改程序中运行时的错误，实现三角形面积的计算。

答案

4.打开素材中的文件夹“4”，请修改程序中逻辑的错误，实现交换两个变量的值。

答案

3.3 综合活动

请根据题干描述的任务需求，按照模块化程序设计的思想方法，进行程序设计。

1.请编写一个程序，让计算机与我们一起玩石头、剪刀、布游戏。

答案

2.随机产生一个100以内的整数，让用户输入猜想的数。如果猜对了，显示正确的信息；如果猜错了，显示猜错的信息，同时统计用户猜想的次数。

答案

3.图片显示程序。用单选框控制图片的显示和隐藏。

答案

4.1 用解析法设计程序

一、单项选择题

1.如要完成：从键盘输入一个正整数，判断是否是奇数，如是就在屏幕上显示。比较好的算法

是（）。

A.①输入的数存入n变量②f=(n\2=Int(n/2)) ③如果f的值为True就显示n的值

B.①输入的数存入n变量②f=(n\2=Int(n/2)) ③如果f的值为False就显示n的值

C.①输入的数存入n变量②如果n/2=Int(n/2)成立，就显示n值

D.①输入的数存入n变量②如果n/2=Int(n/2)不成立，就显示n值

答案

2.a，b，c三个变量中存放不同的整数，让计算机处理一下，使：a中值最大，b中值第二。能

实现此要求，并比较好的算法是（）。

A.①定义一个max(x,y)的函数（值为x，y中大的值）②a=max(max(a,b),c) ③b=max(b,c)

B.①如a

C.①如a>b就a=b ②如a>c就a=c ③如b>c就b=c

D.①如a

答案

二、填空题

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 = i * 3

i = i + 1

Loop

Text1.Text = Str(s)

End Sub

问：

（1）刚退出循环时，变量i的值是。

（2）为了实现上述表达式的计算，程序中画线处的表达式应更正为。

答案

4.以下Visual Basic程序的功能是：计算表达式1＋3＋9＋27＋81＋…+2187的值，并在文本框Text1中输出计算结果。

Private Sub Command1_Click()

Dim i As Integer, t As Long

t = 0

i = 1

Do While i <= 2187

t = t + i

i = i + 3

Loop

Text1.Text = Str(t)

End Sub

问：

（1）为了实现这一目标，程序画线处的表达式应更正为。

（2）运行更正后的程序，循环刚退出时变量i的值为。

答案

5.将一个十进制正整数转化为二进制数可以采用“除二取余法”，主要方法就是将十进制数用2除，保存所得余数，然后将商的整数部分作为下次运算的被除数，重复上述“除二取余”操作，直到商的整数部分为零停止。

程序界面如图VB-1所示，在文本框Text1中输入一个正整数，单击“开始转换”按钮

（Command1）后，对应的二进制数在标签Label3中显示出来。

解决此问题的算法流程图如图VB-2所示，相应的Visual Basic程序如下，在程序①和②画线处，填入适当的语句或表达式，把程序补充完整。

Private Sub Command1_Click()

Dim x As Integer, s As String, r As Integer, t As Integer

_____①_____

s = ""

Do While x <> 0

r = x Mod 2

s = Str(r) + s

x = ________②________

Loop

Label3.Caption = s

End Sub

程序中①画线处应填入。

程序中②画线处应填入。

答案

4.2 用穷举法设计程

序

一、单选题

1 .使用穷举法解决问题，在列举问题可能解的过程中，（）。

A.不能遗漏，但可以重复

B.不能遗漏，也不应重复

C.可以遗漏，但不应重复

D.可以遗漏，也可以重复

答案

2 .鸡、兔共笼，有腿共60条，问鸡、兔各有多少只？下面鸡和兔的只数最合理的范围是（）。

A. 鸡：1到28，兔：1到14

B. 鸡：2到28，兔：1到14

C. 鸡：1到28，兔：2到14

D. 鸡：2到28，兔：2到14

答案