活动一用For...Next语句实现循环结构 (3).ppt

算法与程序设计 For Next循环语句思考1、如果制作了一条欢迎标语，那么我们需要打印出来10条甚至更多条这个标语该怎么做呢？2、计算机是如何查找到某个盘符或文件夹内用户所需要的一个文件？3、如何读取出数据库中的一组数据，并按从小到大或从大到小的顺序排列显示出来？要完成这样有规律的重复性工作，应该使用哪种程序结构来实现？循环结构特点在程序中，用于重复一个或一组语句的那一部分称为循环循环。在一个循环中重复的语句（或语句组）称为循环语句循环语句块块。For Next循环语句格式For 循环控制变量循环控制变量=初值初值 To 终值终值 Step 步长步长 循环语句块循环语句块Next 循环控制变量循环控制变量-打印出打印出1-201-20的所有奇数的所有奇数-For k=1 To 20 For k=1 To 20 Step 2Step 2 Print k;Print k;Next Next k k-评委打分思考：（1）回顾第1章第2节，第19页“求三个数中最大值问题”的算法思路。如何找到最高分和最低分？（2）如何获得评委的打分？（3）计算选手最终得分的数学算式是什么？算法描述算法描述程序程序设计设计定义变量：MaxS（最高分）、MinS（最低分）、Score（评委打分）、Sum（打分总计）、i（循环变量）Dim MaxS#,MinS#,Score#,Sum#Dim i As Integer循环开始：遍历5位评委打分？当第1个评委打分，MaxS、MinS、Sum赋初值If i=1 Then MaxS=？；MinS=？；Sum=？如果不是第1个评委打分，则给MaxS、MinS、Sum的赋值，如果i=5执行，否则执行If MaxS Val(Score)Then MaxS=？Else If Val(Score)MinS Then MinS=？End IfSum=Sum+Val(Score)输出相应信息Print MaxS,MinS,？程序结束End Sub设计程序：打印出下面四种图形（For Next循环）思考以下问题并编写程序：（1）查看图形排列规律，填写表格中“*”个数与所在行对应关系，思考其之间关系的通项公式是什么。（2）VB中在窗体中默认的打印位置怎样？（3）如何调整“*”开始打印的位置？作业1：完成打印图形（4）程序设计。作业2：百钱百鸡问题，根据算法和流程图设计出程序代码。