第三课 小海龟画正多边形 课件（15张PPT）

(共15张PPT)
小海龟画
正多边形
第三课
算法和流程图
算法：是指解题方案的准确而完整的描述，是一系列解决问题的清晰指令，算法代表着用系统的方法描述解决问题的策略机制。
画正三角形的几个步骤：
第一步：画一条边，右转120度
第二步：画一条边，右转120度
第三步：画一条边，右转120度
我们把以上“画正三角形”的方法和步骤称之为算法！
流程图
开始
画一条边，右转120度
画一条边，右转120度
画一条边，右转120度
结束
for……endfor循环语句
格式：
For<循环变量>=<初值>To<终值>[Step<步长>]
<语句组>
EndFor
如：画正三角形可以写成
For i=1 To 3 Step 1
Turtle.move(100)
Turtle.Turn(120)
EndFor
for……endfor循环语句流程图
循环变量=初值
执行循环语句中间的语句组
循环变量增加一个步长
判断循环变量是否超过终值？
i=1
Turtle.move(100) Turtle.Turn(120)
i=i+1
判断i是否大于3
画正12边形
S=12
Length=50
E=360/S
For i=1 To S Step 1
Turtle.Move(Length)
Turtle.Turn(E)
EndFor
S=8
Length=50
E=360/S
GraphicsWindow.PenColor="Red"
For i=1 To S Step 1
GraphicsWindow.PenWidth=i
Turtle.Move(Length)
Turtle.Turn(E)
EndFor
S=5
Length=150
E=360/S
GraphicsWindow.PenColor="Red"
For i=2 To Length Step 3
Turtle.Move(i)
Turtle.Turn(E)
EndFor
S=5
Length=30
GraphicsWindow.PenColor="purple"
For i=1 To S Step 1
Turtle.Move(Length)
Turtle.Turn(90)
Turtle.Move(Length)
Turtle.Turn(-90)
EndFor
s=5
length=200
e=720/s
Turtle.Speed=7
For i=1 To s Step 1
Turtle.Move(length)
Turtle.Turn(e)
EndFor
Turtle.Speed=10
Turtle .Angle =30
For i=1 To 400 Step 10
Turtle.Move(200)
Turtle.Turn(170)
EndFor