程序的循环结构(一)课件.ppt
12.4 2.4 程序程序的循环结构的循环结构执行顺序:当执行第一条语句后,必须从第二条语句执行,顺序执行所有的语句,直到执行完最后一条语句为止。程序特点:在这个结构内按由上到下的书写顺序执行,它只有一个入口和一个出口。知识回顾:知识回顾:顺序结构顺序结构知识回顾:知识回顾:顺序结构顺序结构赋值语句:变量名赋值语句:变量名=表达式表达式输入数据的函数:输入数据的函数:InputBox(InputBox(提示信息提示信息)输出数据的语句:输出数据的语句:Print Print 输出内容输出内容IfIf 条件条件 ThenThen 语句组语句组1 1End IfEnd IfIfIf 条件条件 ThenThen 语句组语句组1 1ElseElse 语句组语句组2 2End IfEnd If知识回顾:知识回顾:选择结构选择结构程序特点:程序的执行不再完全按照语句的顺序执行,而是根据条件是否成立来决定程序执行的走向。格式一:格式一:格式二:格式二:*Print *Print *Print *Print *Print *Print *Print *Print *Print *Print *思考:思考:如何打印一列五颗星?观察:重复的操作是什么?重复了几次?FOR FOR 循环循环语句的基本格式语句的基本格式For For 循环变量循环变量=初值初值 To To 终值终值 Step Step 步长步长 语句语句组组Next Next 循环循环变量变量例:例:For i=For i=1 1 To To 5 5 Step 1Step 1 Print i Print i Next Next i iFOR FOR 循环循环语句的循环特点语句的循环特点1、For后的循环变量与Next后的循环变量,必须相同(都为i)2、Step后的步长为1时可以省略 (步长可为正也可为负)3、执行一次 Next就增加一个步长4、循环体执行的次数为 IntInt(终值(终值-初值)初值)/步长步长+1+1)循环变量循环变量=初值初值执行循环体(语句组)执行循环体(语句组)循环变量增加一个步长循环变量增加一个步长是是否否FOR FOR 循环循环语句的执行过程语句的执行过程循环变量超过终值例例1 1:For i=For i=1 1 1 1 To To 5 5 5 5 Step 1Step 1 Print i Print i Print i Print i Next Next i i i i i Print i Next i 1 1 2 2 2 3 3 3 4 4 4 5 5 5 6i=2Print*i=i+1i=3Print*i=i+1i=4Print*i=i+1i=5Print*i=i+1i=1Print*i=i+1i=6超出1,5,退出循环FOR FOR 循环循环语句的执行过程语句的执行过程循环变量=初值执行循环体(语句组)循环变量增加一个步长是是否否FOR FOR 循环循环语句的执行过程语句的执行过程循环变量“超过”终值例例2 2:For i=For i=5 5 5 5 To To 1 1 1 1 Step-1Step-1 Print i Print i Print i Print i Next Next i i i i i Print i Next i 5 5 4 4 4 3 3 3 2 2 2 1 1 1 0循环变量=初值执行循环体(语句组)循环变量增加一个步长是是否否FOR FOR 循环循环语句的执行过程语句的执行过程循环变量“超过”终值例例3 3:For i=For i=2 2 2 2 To To 10101010 Step 2Step 2 Print i Print i Print i Print i Next Next i i i i i Print i Next i 2 2 4 4 4 6 6 6 8 8 8 10 10 10 12思考:思考:如何打印一列五颗星?一、分析问题:一、分析问题:设循环变量为设循环变量为i,i,打印打印5 5颗星,需重复执行颗星,需重复执行Print Print*5 5次,则次,则i=1 to 5 i=1 to 5(步长为(步长为1)1)。二二、设计算法:、设计算法:三、编写程序:三、编写程序:ClsDimiAsIntegerFori=1To5Print“*“Nexti四、调试程序四、调试程序课堂小结课堂小结1.1.循环变量循环变量“超过超过”终值的含义:终值的含义:步长为正,大于终值步长为正,大于终值 步长为负,小于终值步长为负,小于终值2.For2.For循环的循环体执行次数:循环的循环体执行次数:(终值(终值-初值)初值)/步长步长+1+1的整数部分的整数部分课堂课堂练习练习:阅读下面的程序,分析结果并上机验证。ClsDim i As IntegerFor i=1 To 10 Step 1 Print “*“;Next iClsDim i As IntegerFor i=1 To 100 Step 10 Print i;Next i