计算机解决问题的过程.ppt

下载文档

26
0
约小于1千字
约 7页
2017-06-03 发布于上海
举报
版权申诉
保障服务

计算机解决问题的过程.ppt

1、本文档共7页，可阅读全部内容。
2、有哪些信誉好的足球投注网站（book118）网站文档一经付费（服务费），不意味着购买了该文档的版权，仅供个人/单位学习、研究之用，不得用于商业用途，未经授权，严禁复制、发行、汇编、翻译或者网络传播等，侵权必究。
3、本站所有内容均由合作方或网友上传，本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺！文档内容仅供研究参考，付费前请自行鉴别。如您付费，意味着您自己接受本站规则且自行承担风险，本站不退款、不进行额外附加服务；查看《如何避免下载的几个坑》。如果您已付费下载过本站文档，您可以点击这里二次下载。
4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等，请点击“版权申诉”（推荐），也可以打举报电话：400-050-0827(电话支持时间：9:00-18:30)。

* * 计算机解决问题的过程 ????????? ????? 一只小猴子摘了一堆桃子，第一天，它吃了这堆桃子的一半又多吃了一个；第二天，它吃了剩下的一半又多吃了一个，依此类推，到第十天的时候只剩下一个桃子。问，小猴子一共摘了多少个桃子？ “猴子摘桃问题”： 2、写出解题步骤: 1）设前一天的桃子数为a,后一天的桃子数为b。 2）令b=1。 3）根据a=2*(b+1) 计算出a。 4）令b=a,转入3） 5）循环3）、4）步骤X次后，输出a的值。 1、分析问题: 求解问题的已知条件：第 10 天剩下 1 个桃子。 ?隐含条件：每一次前一天的桃子个数等于后一天桃子的个数加 1 的 2 倍。 Private Sub Command1_Click() Dim a As Integer, b As Integer, i As Integer b = 1 For i = 1 To 9 a = 2 * (b + 1) b = a Next i print a End Sub 用Visual Basic语言编写的程序如下：计算机解决问题的基本过程分析问题输出结果设计算法编写程序调试运行人人人人和计算机计算机 *