- 1、本文档共13页,可阅读全部内容。
- 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
- 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
VB算法复习学案
主题:算法与程序实现
一、点击考点:
理解解析法的基本思想。
了解枚(穷)举算法求解问题的过程
了解使用数组存储批量数据的基本方法
理解顺序查找、二分查找算法思想
了解一到两种经典排序算法思想(如插入排序、冒泡排序)。
了解递归思想与递归的数学意义。
二、学习目标:
1、进一步体验算法思想,了解算法和程序设计在解决问题中的地位和作用
2、通过实例,了解用解析法、穷举法、查找算法、排序得法、递归算法解决问题的基本方法
3、了解冒泡排序算法等更多算法思想
三、活动形式:
在教师引导下的自主学习
四、考点注解
理解解析法的基本思想。
所谓解析法(analysis algorithm)是指用解析的方法找出表示问题的前提条件与结果之间关系的数学表达式,并通过表达式的计算来实现问题求解。
【出租车计费】 某城市的出租车计费标准为起步价10元(3公里内),此外,每公里2元,超过10公里部分每公里3元,输入行车距离,输出车费。
穷举法也叫枚举法或列举法。在研究对象是由有限个元素构成的集合时,把所有对象一一列举出来,再对其一一进行研究。带入实际,一个个检验是否符合这种方法一般在计算机中运用,因为计算机计算速度快,可以很快验证答案是否正确。
VB代码:
Privat sub command1_click()
Dim x,y ,z as integer
For x=1 to 20 step 1
For y=1 to 33 step 1
z=100-x-y
If 5*x+3*y+z/3=100 then
Print x,y,z
Next y
Next x
End sub
小结:
穷举法的思路与解题步骤
穷举法的基本思路:
把问题涉及的可能情况一一罗列出来,并且根据题目的条件和实际背景逐个作出判断,从中挑选出符合条件的解答。
穷举法的解题步骤:
1、分析问题,找出条件与未知数,确定变量;
2、列举出变量所有可能的情况,用循环或循环的嵌套实现;
3、写出符合条件的判断语句,用选择语句实现;
4、输出符合条件的情况;
5、优化程序。
数组在程序设计中,为了处理方便, 把具有相同类型的若干变量按有序的形式组织起来。这些按序排列的同类数据元素的集合称为数组。
下面举例说明定长数组的定义:Dim a(1 to 3)As Integer②Dim b(5 to 9)As String③Dim c(7)As Integer其中,例定义了一个具有三个元素的整型数组,其下标从1到3。例定义了一个具有五个元素的字符型数组,其下标从5到9。例缺省了下界,它定义了一个具有八个元素的整型数组,其下标从0到7。
数组元素是组成数组的基本单元。数组元素也是一种变量, 其标识方法为数组名后跟一个下标。 下标表示了元素在数组中的顺序号。【顺序查找】 所谓顺序查找就是从数组的第一个数开始,逐个与要查找的数进行比较,如果相同则输出找到的信息。
Dim d(1 To 1000) As Integer
Dim num As Integer
Private Sub Command1_Click() 生成随机数按钮
num = Val(Text1.Text)
If num = 0 Or num = 1000 Then
Text1.Text = 数据个数不符合
Exit Sub
End If
Randomize 初始化随机函数
List1.Clear
For i = 1 To num
j = Round(Rnd * 1000) rnd函数生成一个[0,1)之间的随机数
List1.AddItem Str(i) + + Str(j)
d(i) = j
Next
End Sub
Private Sub Command3_Click()
Key = Val(Text2.Text)
j = 1
Do While j = num
If d(j) = Key Then
Label5.Caption = 在数组的 + Str(j) + 位置中
Exit Do
End If
j = 1
Loop
If j = num + 1 Then
Label5.Caption = 在数组中没有找到 + Str(Key)
End If
End Sub
【二分查找】又称折半查找,它是一种效率较高的查找方法。
【二分查找要求】:1.必须采用顺序存储结构 2.必须按关键字大小有序排列。
【优缺点】折半查找法的优点是比较次数少,查找速度快,平均性能好;其缺点是要求待查表为有序表,且插入删除困难。因此,折半查找方法适用于不经常变动
您可能关注的文档
- 2017年高考选择题解题秘诀.doc
- 212江苏省大气污染防治行动计划实施方案.docx
- 26.清平乐.doc
- 26清平乐_村居__导学案.doc
- 3WFI工艺描述.doc
- 4-1社会危机四伏和庆历新政.doc
- 3ws田家炳中学2016届高三化学周测1(含答案).doc
- 44金属的腐蚀与防护.doc
- 3D成长树模型的受迫结果计算方法.docx
- 4名商人带4名随从安全过河.docx
- 北交所消费服务产业跟踪第十九期:下游日化行业发展促进香精香料行业稳步增长,关注北交所相关标的-250623-华源证券-18页.pdf
- 北交所策略专题报告:北证国光,掘金北证国企改革,国企改革红利下的低估值机遇-250622-开源证券-17页.pdf
- 2025人工智能行业中期投资策略报-中信建投.pdf
- 2025年GenAI硬件北美影响力报告.pdf
- Morgan Stanley-中国的新兴前沿 从轮式到步式——汽车如何跨足人形机器人-116052139.pdf
- 并购重组跟踪(二十五)-250623-东吴证券-13页.pdf
- 冲击的“脉络“系列之二:封锁“霍尔木兹”,不可信的承诺?-250625-申万宏源-15页.pdf
- 2025中国绿氢产业发展蓝皮书.pdf
- 2025河南上市公司白皮书-曈.pdf
- 策略点评报告:并购重组跟踪半月报-250626-中银证券-10页.pdf
文档评论(0)