循环结构复习提纲.doc

循环结构复习提纲 分支结构与循环结构的比较： 注意： （1）i是计数器，用来控制循环次数。 （2）sum是累加器，每次输入的数据被累加到sum中。累加器sum初值为09 做过的练习： 1.从键盘输入5个数，求它们的和sum。 注意： （1）i是计数器，用来控制循环次数。 （2）sum是累加器，每次输入的数据被累加到sum中。累加器sum初值为0 2.从键盘输入高一年级6个小组收集的废电池数，求出总数并输出。 3.计算求s=1+2+3+……+n的值，其中n由键盘输入。 4.计算s=1×2×3×……×n的值，其中n由键盘输入。 注意：这里的S是累乘器，其初值为1。 5.求s=2+4+6+……前n项的值。 7.输入若干个数x，当输入999时结束，求输入数据的和s。 8.输入若干个数，当它们的和超过100时停止输入，并输出求和的结果。（假定输入的数据均为正数） 9.求满足1+2+3+4+……+n20最小的n值。 10.输入某次考试成绩mark,统计100分人数good。（输入-1表示结束） 注意： 当循环次数确定时，可以用计数器控制循环，即计数法。 当循环次数不确定时，可以用特定的数据标志控制循环，即标志法。 （前面练习中的第1-6题是用计数法，第7-10题用标志法。） 当循环和直到循环的区别： 当循环先判断循环条件，再决定是否执行循环体。循环体有可能一次也不执行。 直到循环先执行循环体，再判断循环条件。循环体至少执行一次。 11.输入若干个数，当它们的和超过100时停止输入，并输出求和的结果。（用直到循环表示） 1 有判断框，但只判断一次 流程线朝下走 只有一个入口，一个出口 有判断框，可能判断一次或多次 有一条流程线返回到判断框的入口处 只有一个入口，一个出口 当循环 “当循环”语句： Do While 条件 循环体 Loop 先判断循环条件，当条件成立时，执行循环体； 条件不成立时，退出循环。 Dim x As Integer, i As Integer, sum As Integer sum = 0 i = 1 Do While i = 5 x = InputBox(请输入一个数：) sum = sum + x i = i + 1 Loop Print sum Dim x As Integer, i As Integer, sum As Integer sum = 0 i = 1 Do While i = 6 x = InputBox(请输入收集的废电池数：) sum = sum + x i = i + 1 Loop Print 收集的废电池总数为; sum Dim s As Integer, x As Integer s = 0 Do x = InputBox(请输入一个数：) s = s + x Loop Until s 100 Dim n As Integer, i As Integer, s As Integer s = 0 i = 1 n = InputBox(请输入n:) Do While i = n s = s + i i = i + 1 Loop Print s Dim n, i As Integer Dim s As Long s = 1 i = 1 n = InputBox(请输入n:) Do While i = n s = s * i i = i + 1 Loop Print s 6.求s=1×3×5×……前n项的值。 Dim x As Integer, s As Integer s = 0 x = InputBox(请输入一个正整数：) Do While x 999 s = s + x x = InputBox(请输入一个正整数：) Loop Print s Dim x As Integer, s As Integer s = 0 Do While s = 100 x = InputBox(请输入一个数) s = s + x Loop Print s Dim i As Integer, s As Integer, n As Integer i = 1 s = 0 Do While s = 20 s = s + i i = i + 1 Loop n = i - 1 Print n Dim good As Integer, mark As Single good = 0 mark = InputBox(请输入一个成绩：) Do While mark -1 If mark = 100 Then good = good + 1