VB中前测型当型循环语句.ppt

VB中前测型当型循环语句Do while……loop讲练课堂 Do while…loop当型循环语句 Do [while <条件>] [循环体] Loop 1、1+2+3+……+n的流程 1、1+2+3+……+n的流程 思考题：比较这两个流程，分别说出它们实现的程序功能是什么？ * * 先看看我！ 条件 循环体 是 执行loop后的语句 否 格 式： 当条件为真（TRUE）时执行循环体； 条件为假（FALSE）时，终止循环，流程转向LOOP语句后的语句。 功 能： 传统流程图 遇到这种情况就写do while语句即循环的开始 遇到这个形状的线就写loop语句，即循环体的结束。 Dim sum as long, n as integer sum=0 n=1 Do while n<=val(text1.text) sum=sum+n n=n+1 Loop Label10.caption=sum 开始 定义变量sum:long 变量n：integer sum=0 n=1 n<=指定值 sum=sum+n n=n+1 输出sum值 结束 是 否 看流程读程序，理解do while…loop语句格式。 例1、求1+2+3+…+n的和值。（n值由用户指定） 搞不清再看看我！ 由此可以看出：循环条件是n<=5; 由此可以看出1+2+3+4+5的循环条件是 n<=5 循环体是：sum=sum+n n=n+1 循环体是：sum=sum+n n=n+1 由此可以看出：循环条件是n<=5; 那么1+2+3+……+n循环条件是： n <= val(text1.text) 循环体是：sum=sum+n n=n+1 循环体是：sum=sum+n n=n+1 用户指定值的表达式 用户指定值的表达式 演 示 执 行 过 程 开始 定义变量sum:long 变量n：integer Sum=0 n=1 n<=指定值 Sum=sum+n n=n+1 输出sum值 结束 是 否 2、1×2×3×…×n的流程 开始 定义变量p:long 变量n：integer p=1 n=1 n<=指定值 结束 p=p*n n=n+1 是 输出p值 否 开始 定义变量sum:long 变量n：integer Sum=0 n=1 n<=指定值 Sum=sum+n n=n+1 输出sum值 结束 是 否 3、1+3+5+7+……+(2n-1)的流程 是 否 开始 定义变量sum:long 变量n：integer Sum=0 n=1 n<=指定值 输出sum值 结束 Sum=sum+(2*n-1) n=n+1 开始 定义变量p:long 变量n：integer p=1 n=1 P<=指定值 结束 n=n+1 p=p*n 是 输出n-1的值 否 开始 定义变量p:long 变量n：integer p=1 n=1 n<=指定值 结束 p=p*n n=n+1 是 输出p值 否