第五章循环结构程序设计58.pptVIP

第五章 循环结构程序设计 用WHILE …WEND实现循环 用DO…LOOP结构实现循环(1) FOR-NEXT循环结构 FOR-NEXT循环结构执行过程 基本要求 掌握WHILE---WEND循环、FOR---NEXT循环和DO---LOOP循环的使用 基本要求 掌握循环嵌套的使用及常用的有关循环的算法的使用。 * * INPUT “n=”;n m=1 p=1 WHILE p=n m=m*P p=p+1 WEND PRINT “m=”;m END 运行结果为： n=?5 m=120 即5！=120 1、最简单的DO循环 DO 循环体 LOOP 循环体 见程序：LOOP1-1.BAS LOOP1-2.BAS DO WHILE 条件 循环体 LOOP 前测试型 DO 循环体 LOOP WHILE 条件 用DO…LOOP结构实现循环(2) 2、带WHILE子句的循环（当循环） 循环体 条件 真 假 后测试型 循环体 条件 假 真 带WHILE子句循环举例(1) 例：求50种商品的平均价格，（N-S流程图见右） 程序： total=0 i=1 DO WHILE i=50 INPUT s total= total+s i=i+1 LOOP price= total/50 PRINT “average price =”;price END 带WHILE子句循环举例(2) 例：求Π的近似值。 程序（前测型）： sum = 0 i = 1 term = 1 / (i * i) DO WHILE term = .00001 sum = sum + term i = i + 1 term = 1 / (i * i) LOOP pi = SQR(sum * 6) PRINT pi=; pi END 程序（后测型）： sum = 0 i = 1 term = 1 / (i * i) DO sum = sum + term i = i + 1 term = 1 / (i * i) LOOP WHILE term = .00001 pi = SQR(sum * 6) PRINT pi=; pi END 带WHILE子句循环举例(3) 程序（前测型）： sum = 0 i = 5 DO WHILE i5 sum = sum + i LOOP PRINT sum END 执行结果：0 程序（后测型）： sum = 0 i = 5 DO sum = sum + i LOOP WHILE i5 PRINT sum END 执行结果：5 前测试型和后测试型的循环结构有时是有区别的，不一定能够互换！ QBASIC保留WHILE-WEND循环主要是为了与GW-BASIC或BASICA兼容。下面两个程序的作用相同。 程序运行输出结果均为： s=1683 n=33 (a) (b) s=0 s=0 i=3 i=3 n=0 n=0 WHILE i＜=99 DO WHILE i＜=99 n=n+1 n=n+1 s=s+i s=s+i i=i+3 i=i+3 WEND LOOP PRINT s=;s,n=;n PRINT s=;s,n=;n END END DO UNTIL 条件 循环体 LOOP 前测试型 DO 循环体 LOOP UNTIL 条件 用DO…LOOP结构实现循环(3) 2、带UNTIL子句的循环（直到型循环） 循环体 条件 假 真 后测试型 循环体 条件 真 假 带UNTIL子句循环举例 例 求2000～2050年之间的所有闰年。 闰年的条件是： ①能被4整除，但不能被100整除的年份都是闰年； ②能被100整除，又能被400整除的年份是闰年。 根据以上两条，2000年，2004年是闰年，2001年，2100年则不是闰年。 year=2000 DO UNTIL year＞2050 IF year MOD 4=0 then