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 元。,如何编写?,能用FOR语句?,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
3、s,i as integer,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,更加简明。,一般情况下,能够预先,确定循环次数,时,应优先采用,For,语句,否则的话应该使用,Do whileLoop,语句,Do whileloop循环,