t=t*i NEXT i
s=s+t
循环初值: i=1, 循环终值: i->10
循环体：
t=t*i
PRINT “T=10!=“;t ,“s=“;
END 问：求:t=n!,如何改s ？
返回
2021问/2/11：求:s=1!+2!+雷3宏设!计+，4版!权+所5有!+……+10!
例4.使用EXIT FOR语句，强行退出循环。
功能：当条件为真，执行循环体，到WEND后再判断条件；否则条件为假，执 行WEND后面的语句。
说明： (1)<条件>可是关系型表达式或逻辑型表达式，甚至可是一个常数，QB将一切
非零的数都视作“真”。
(2) WHILE和WEND必须成对使用。
(3)程序运行时遇到死循环，可以用Ctrl+Break键,使之强制终止程序。
功能：先判断循环〈条件〉，当条件为真(WHILE) 或为假(UNTIL)时，执行〈循环体〉；否则，退 出循环。程序运行到LOOP时,返回到DO语句处, 继续判断条件.
实例: <实例6> <实例7>
2021/2/11
雷宏设计，版权所有
返回
例6．观察下列程序的运行结果。
程序为： CLS x=10 DO WHILE x>=0 PRINT x， x=x-3 LOOP END
BASIC提供的循环语句，可分为已知 循环次数的步长的时候得以终止。
2021/2/11
雷宏设计，版权所有
返回
循环结构流程图
(T) (F)
2021/2/11
雷宏设计，版权所有
返回
固定次数的循环语句(FOR…NEXT)
➢格式：
FOR <循环变量>=<初值> TO〈终值〉[STEP <步长>]
[〈循环体〉]
[EXIT FOR]
NEXT [〈循环变量〉]
➢功能：首先把<初值>赋给<循环变量>，检查<循环
变量>的值是否超过<终值>。
如果超过就停止执行循环体，跳出循环，执
行NEXT后面的语句；
否则执行<循环体>，然后把“循环变量+步长”
的值赋给<循环变量>，重复上述过程。
➢说明
返回
➢实例：<实例1> <实例2> <实例3> <实例4>
STEP 1 可省
INPUT “姓名,成绩:";XM$,cj
sum=sum+cj
PRINT XM$,cj
NEXT i
v=sum/30
PRINT “平均分v=“;v
END
2021/2/11
雷宏设计，版权所有
返回
例2．求s=l+2+3+…+99+100的值。
分析： 循环体-- s=s+i (累加）
循环变量-- i
如：sum=0 FOR i= 1 TO 30 sum=sum+i*i IF sum >=100 THEN NEXT i PRINT sum END
运行结果为：140
EXIT FOR
2021/2/11
雷宏设计，版权所有
返回
条件循环语句(WHILE … WEND)
格式： WHILE <条件> [<循环体>] WEND
<步长>为l，可省。
(2) FOR语句和NEXT语句必须成对出现，不能单独使用。
2021/2/11
雷宏设计，版权所有
返回
例1．
顺序将30个学生的成绩、姓名输入并输出每人的姓名、成绩 和平均成绩。
分析：用FOR语句编程，将执行输入输出的语句作为循环体，
设置一个可以执行30次的循环。
问：初值：？
I=1
初值--_____
终值--_____
步长--_____
s=0
FOR i=1 TO 100
s=s+i
NEXT i
PRINT "l+2+3+…+99+100=”；s
2021/2/11
END
雷宏设计，版权所有
返回
例3
分析：
t=1*2*3*4*……10
编程：求：t=10! 这是一个累乘.
初值： t=1
DIM i,t AS LONG t=1 FOR i=1 TO 10
FOR I= _ TO _ STEP _
终值：？
I=30
循环体
步长：？ 循环体：？
NEXT __ step=1 输入姓名,成绩
退出循环后做什么？ ❖ 程序代码
sum=sum+cj 输出姓名,成绩
计算平均成绩
返回
2021/2/11
雷宏设计，版权输所有出平均成绩
编写程序如下：
sum=0 FOR i=1 TO 30
2021/2/11
雷宏设计，版权所有
For..next的说明：
(1) 格式中各参数的含义如下：
① <循环变量>为数值变量，作用是为循环计数。 ② <初值>，循环开始时赋给<循环变量>的值。 ③ <终值>是控制循环结束的值，当<循环变量>的值超过<终值>时， 退出循环，执行NEXT后面的语句。 ④ <步长>是每执行一次<循环体>后循环变量获得的增量，其值可 是正数或负数，但不能是0。
WHILE i <= 100
IF I MOD 2=0 THEN s=s+i
i=i+1
n=n+1
WEND
print “s=“;s,”n=“;n
END
2021/2/11
雷宏设计，版权所有
返回
格式：
DO…LOOP循环语句
DO [ WHILE | UNTIL〈条件〉]
[〈循环体〉]
[ EXIT DO ]
LOOP [ WHILE | UNTIL〈条件〉]
实例: <实例5>
2021/2/11
雷宏设计，版权所有
返回
实例5
如：求s=1+2+3…+100
s=0：i=1 WHILE i <= 100
s=s+i i=i+1 WEND print “s=“;s
问：求1--100间偶数的和及偶数个数，并 输出这些偶数？
程序代码
2021/2/11
雷宏设计，版权所有
返回
程序:
s=0：n=0:i=2 WHILE i <= 100
s=s+i i=i+2 n=n+1 WEND PRINT “s=“;s,”n=“;n END
s=0：n=0 FOR i=2 TO 100 STEP 2
s=s+i n=n+1 NEXT i PRINT “s=“;s,”n=“;n END
s=0：n=0:i=1
循环结构程序设计
❖ 本次课学习循环结构设计：
循环结构的概念 固定次数的循环语句（For..Next） 条件循环语句（While..Wend） 完整的条件循环语句（Do…Loop） 三种循环语句的比较 循环结构的嵌套 循环结构实例
2021/2/11
雷宏设计，版权所有
循环结构程序设计的概念
循环结构程序设计是指在程序中，有 规律地反复执行某一程序块的结构。称 重复执行的该程序块为它的循环体。