算法的程序实现_第1页
算法的程序实现_第2页
算法的程序实现_第3页
算法的程序实现_第4页
算法的程序实现_第5页
已阅读5页,还剩5页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、算法的程序实现 解析法 穷举法 数组 递归顺序查找二分法冒泡排序解析法 解析法就是在分析具体问题的基础上,抽取出一个数学模型,这个数学模型能用若干个解析表达式表示出来,解决了这些表达式,问题就得以解决了。 最常用的算法之一。 凡是能用解析求解的问题都可以通过定量分析,并能解析表达式进行描述。 某城市提倡节约用水,规定:居民用水量不超过50立方米,每立方米水0.9元;如果超过50立方米,超过部分每立方米水1.5元。从键盘输入用水量,计算水费。x=50y=0.9*xy=45+(x-50)*1.5falsetruePrint “水费为水费为”; yx=Inputbox(“请输入用水量请输入用水量”)

2、 某城市提倡节约用水,规定:居民用水量不超过50立方米,每立方米水0.9元;如果超过50立方米,超过部分每立方米水1.5元。从键盘输入用水量,计算水费。Dim x as Integer, y as Single x= Inputbox (请输入用水量) If x=50 Then y=0.9*x Else y=45+(x-50)*1.5 End If Print 水费为;y 穷举法 也叫枚举法,列举法,它将求解的对象一一列举出来,然后逐一加以分析处理并验证结果是否满足给定的条件,穷举完所有的对象,问题将最终得以解决。 特点是 求解对象是有限的,而且可以按某种规则列举对象。水仙花数问题 Dim a

3、 As Long Dim b As Long Dim c As Long Dim d As Long For a = 100 To 999 b = a 100 c = (a - b * 100) 10 d = a - 100 * b - 10 * c If a = b 3 + c 3 + d 3 Then Print a=; a Next a鸡兔同笼 百钱买百鸡等 Dim x As Integer, y As Integer, z As Integer For x = 1 To 19 For y = 1 To 33 z = 100 - x - y If 5 * x + 3 * y + z / 3 = 100 Then Print 公鸡:; x, 母鸡:; y, 小鸡; z End If Next y Next x 数组 一组相 同类型的变量的集合,集合中的每一个元素都是独立的 变量,能够通过数组的序列号别引用。 Dim 数组名(常量) As 数据类型 顺序 查找 二分法查找 冒泡排序 递归算法 如

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论