小海龟画正多边形PPT文档格式.pptx
《小海龟画正多边形PPT文档格式.pptx》由会员分享,可在线阅读,更多相关《小海龟画正多边形PPT文档格式.pptx(8页珍藏版)》请在冰豆网上搜索。
1.3小海龟画正多边形Turtle.Move(100)Turtle.Turn(120)Turtle.Move(100)Turtle.Turn(120)Turtle.Move(100)Turtle.Turn(120)一、算法与流程图正三角形程序1正三角形程序2S=3Length=100E=360/STurtle.Move(Length)Turtle.Turn(E)Turtle.Move(Length)Turtle.Turn(E)Turtle.Move(Length)Turtle.Turn(E)重复多少次?
@#@一、算法与流程图算法1、画一条边,右转120度;@#@2、画一条边,右转120度;@#@3、画一条边,右转120度。
@#@流程图1开始流程图2画一条边,右转120度画一条边,右转120度画一条边,右转120度结束重复多少次?
@#@假如是正五变形、正N变形呢?
@#@开始i=1i=3是否画一条边,右转120度i增加1结束流程图图形图形形名称名称功能功能开始/结束框表示开始或结束处理框表示计算或处理等判断框表示条件判断流程线表示程序的执行顺序二、ForEndFor循环语句Fori=1to3step1Turtle.Move(100)Turtle.Turn(120)EndFor程序(循环部分)For=TostepEndFor程序(循环部分)流程图2开始i=1i=3是否画一条边,右转120度i增加1结束正N变形程序?
@#@画正12变形程序1S=12Length=50E=360/SFori=1toSstep1Tutle.Move(Length)Turtle.Turn(E)EndFor画正12变形程序2S=12Length=50E=360/SFori=Sto1step-1Tutle.Move(Length)Turtle.Turn(E)EndFor自主练习任务1:
@#@画正18变形,要求用ForEndFor循环语句任务2:
@#@完成试一试P18第一题:
@#@编写程序,画一个边越来越粗的正八边形。
@#@(提示:
@#@边的变化跟随着计数器变化)任务3:
@#@完成试一试P19第二题任务4:
@#@完成试一试P19第三题答案(P18-19试一试)第一题S=8Length=50E=360/SGraphicsWindow.PenColor=“Red”Fori=1toSstep1GraphicsWindow.PenWidth=iTurtle.Move(Length)Turtle.Turn(E)EndFor第二题S=4Length=50E=360/SGraphicsWindow.PenColor=“Red”Fori=2toLengthstep2Turtle.Move(i)Turtle.Turn(E)EndFor