Dowhile循.ppt

1、复习fornext循环，写一个计程仪计划，订正1 2 3 100之和。 s=0for I=1to 100 s=s I下一个打印，并且已知的S=1 2 3 n找到最大整数n，使得S30000。 普计程仪柱的循环结构(2)dowhileLoop语句、Do whileLoop循环、do while语句组(循环整体) loop、已知的S=1 2 3 n，找到最大的整数n，设为S30000。 导出I=0s=0dowhiles 30000 I=I1s=siloopprinti、问题1: Dim s、IAS integers=0I=1dowhilei=100 s=silli运行结果，I始终等于1，s不断增加

2、条件n=1不成立，永远不能进入循环，c，n=1，纸的长度长于一盏茶，厚度为0.1毫米，对折，假定一次的厚度增加1倍，现在把纸对折，直到总厚度超过珠穆朗玛峰的高度(珠穆朗玛峰) 、Do whileLoop循环、Do while语句组(循环体) loop、I=0s=0.1dowhiles=8848130 I=I1s=s *2loopprinti，您估计： 的双曲馀弦值。 使用For语句比使用Do whileLoop更容易。 一般来说，如果可以预先决定循环次数，则For语句优先，否则，Do whileLoop语句、Do whileLoop循环、练习、(2010HK )以下的Visual Basic段

3、为完整的Do语句短划线的语句为dowhilen 11 (2012HK )有以下可视基本字段： x=-3 Do While x 0 x=x 2 Loop此字段运行后，变量x的值为A) -1 B) -3 C) 3 D) 1，d，d s=03360 I=1dowhilei=10 ii 其输出结果为A. 30 B. 0 C. 10 D.20， a，练习，下一个子摇滾乐的执行结果是私有子cm1_ click () dim a，基本值=1: b=0dowhilea=5b=b a * a : a=a 1环形打印机，弯曲子(655 b )5) 6 求出s在1000以下时的最大n值： dim s、nas int

4、egers=13360 n=1do while.n=n1. loop打印“n=”； 对n-1堆计程仪中的横线进行补充，分别设为a ) s=1000 s=s * nb ) s=1000 s=NC ) n=1000 n=s * nd ) n=1000 s=205=25、1=2、7025=95、25=30、21=3 坏话： Year=Year 1 S=S X X=X 5，荒漠化、荒漠化和程序段， Dim S As Double所荒漠化的总面积Dim X As Double下一年度荒漠化的面积Dim Year As Integer年year=0s=50x=20 dowhiles 1000年year=year1s=sxx=loop text1. text=stext 定义变量、初始值、循环文件、输出、字段为： Dim m As Double日排放量Dim day As Integer所需天数day=0m=400 dowhilem 300 m=m *0. 95 day=day1looptext1. text=str (。 S2000，A=a 20，流程段是Dim S As integer的现有树Dim year As