高一信息技术do-while循环_第1页
高一信息技术do-while循环_第2页
高一信息技术do-while循环_第3页
高一信息技术do-while循环_第4页
高一信息技术do-while循环_第5页
已阅读5页，还剩5页未读， 继续免费阅读

下载本文档

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

文档简介

1、复习fornext循环,“希望工程存钱”问题。 s=0 For i=1 to 24 s=s+i Next i Print s,程序的循环结构（二） do whileLoop语句,“希望工程存钱”问题,假设你从今年开始，1月份为“希望工程”存入1元钱，2月份存入2元钱，3月份存入3元钱依次类推，计算多少个月才能为希望工程存款超过 500 元。,Do whileloop循环,Do while 语句组（循环体） Loop,i=0 Do while s3 i=i+1 s=s+i Loop print i-1,（1）分析问题,考虑：涉及哪些变量？,每月存的钱数 总钱数 月份,（2）设计算法,定义变量：

2、月份X，总钱数S 变量初始化： X=0, S=0 数据处理： X=X+1, S=S+X 条件判断： 如果S=500，则返回 数据输出： 输出X和S的值,假设你从今年开始，1月份为“希望工程”存入1元钱，2月份存入2元钱，3月份存入3元钱依次类推，计算多少个月才能为希望工程存款超过 500 元。,（3）编写程序-完善程序题,Private Sub Form_click() Dim x As Integer, s As Integer x = _ s = _ Do While _ _ _ Loop Print 第; x; 个月; s; 元 End Sub,题1： Dim s,i as intege

3、r s=0 i=1 do While i=100 s=s+i loop print s,A)5050 B)5051 c)死循环 D)无穷大的数,随堂练习阅读程序，指出错在哪？,i始终等于1, s不断自增,题2： Dim a,s as integer n=5 s=0 do While n=1 s=s+n n=n-1 loop print s,尝试改动程序的一处地方， 使程序计算1+2+3+4+5的结果。,条件n=1不成立，始终没有进入循环,假设纸的长度足够长，厚度为0.1毫米，对折一次厚度增加1倍，现在对折纸张，直到总厚度超过珠穆朗玛峰的高度为之（珠穆朗玛峰的高度为8848.13米），求对折纸张的次数。 （答案27次）,Do whileloop上机实践题,Do while 语句组（循环体） Loop,采用For语句比Do whileLoop更加简明。 一般情况下，能够预先确定循环次

人人文库> 全部分类> 教育资料 > 课件下载

温馨提示

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

最新文档

评论

0/150

提交评论