解析枚举算法强化练习.pdfVIP

.

解析、枚举算法强化练习

1．下列问题中适合使用解析算法解决的是()

A．计算两个电阻的并联值B．完成各大网站访问量的排名

C．找出100以内所有的质数D．找出100以内所有6的倍数

2．用解析算法计算匀加速直线运动的位移问题时，使用的计算公式是

s=v0t+(1/2)at^2，下列用于描述该公式的

VB表达式中，正确的是()

A．s=v0t+l/2at^2B．s=v0*t+l/(2*a*t*t)

C.s=v0t+l/(2*at^2)D.s=v0*t+l/2*a*t^2

3．用解析算法实现求匀速直线运动位移的VB程序代码如下：

PrivateSubCommand1__Click()

DimSAsSingle

DimVAsSingle

DimtAsSingle

s=0

v=10

t=Val(Textl.Text)

s=v*t

Label1.Caption=Str(s)

EndSub

程序界面如图所示：

在文本框Textl中输入28，单击“计算”按钮Commandl后．

标签Labell中显示的内容是。

..

.

4．人们常用的欧洲鞋号（又称“法码”）与我国出台的鞋类“薪鞋号”标准存在着

如下换算关系：新鞋号=（法码+10）÷2xl0.如新鞋号为23.5的鞋子，即为人们平常

所说的37码。下面的VB程序可用于解决此问题，程序运行界面如图所示：

运行程序，在文本框Textl中输入新鞋号，单击“换算”按钮Commandl，在文

本框Text2中显示所对应的法码，程序代码如下：

PrivateSubCommand1__Click()

DimnAsInteger，mAsSinglen为新鞋号，m为法码

n=Val(TextI.Text)

Text2.Text=Str(m)

EndSub

程序划线处应填入的内容是。

5．某停车场的收费标准如下：1小时及以内，收费5元；超过1小时的，超过部分

每小时按15元收费（不足1小时的按1小时计算），具体算法流程图如图3-15-5所示。

下面VB程序可用于解决此问题，程序运行界面如图所示：

..

.

运行程序，在文本Textl中输入停车时间（分钟），单击“收费”按钮Commandl，

在文本框Text2中显示所对应的费用（元）．程序代码如下：

PrivateSubCommandl_Click()

DimtAsInteger，costAsInteger，hAsSinglet为停车时间（分钟），h为停车

小时数，cost为费用

t=Val(Textl.Text)

If①Then

cost=5

Else

Cost=②

EndIf

Text2.Text=Str（cost）

EndSub

在程序①和②划线处填入适当的语句或表达式，将程序补充完整。

程序中，①划线处填入。

程序中，②划线处室填入

枚举算法：

1．用枚举算法求解“找出昕有满足各位数字之