小海龟画正多边形ppt课件_第1页
小海龟画正多边形ppt课件_第2页
小海龟画正多边形ppt课件_第3页
小海龟画正多边形ppt课件_第4页
小海龟画正多边形ppt课件_第5页
已阅读5页，还剩4页未读， 继续免费阅读

下载本文档

版权说明：本文档由用户提供并上传，收益归属内容提供方，若内容存在侵权，请进行举报或认领

文档简介

1、1 11.3小海龟画正多边形2 2Turtle.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)重复多少次？3 3一、算法与流程图算法1、画一条边，右转120度；2、画一条边，右转120度

2、；3、画一条边，右转120度。流程图1开始流程图2画一条边，右转120度画一条边，右转120度画一条边，右转120度结束重复多少次？假如是正五变形、正N变形呢？开始i=1i=3是否画一条边，右转120度i增加1结束4 4流程图图形图形图形名称名称功能功能开始/结束框表示开始或结束处理框表示计算或处理等判断框表示条件判断流程线表示程序的执行顺序5 5二、ForEndFor循环语句For i=1 to 3 step 1 Turtle.Move(100) Turtle.Turn(120)EndFor程序(循环部分)For =To step EndFor程序(循环部分)流程图2开始i=1i=3是否画一

3、条边，右转120度i增加1结束6 6正N变形程序？画正12变形程序1S=12Length=50E=360/SFor i=1 to S step 1 Tutle.Move(Length) Turtle.Turn(E)EndFor画正12变形程序2S=12Length=50E=360/SFor i=S to 1 step -1 Tutle.Move(Length) Turtle.Turn(E)EndFor7 7自主练习任务1：画正18变形，要求用ForEndFor循环语句任务2：完成试一试P18第一题：编写程序，画一个边越来越粗的正八边形。(提示：边的变化跟随着计数器变化)任务3：完成试一试P19第二题任务4：完成试一试P19第三题8 8答案（P18-19试一试）第一题S=8Length=50E=360/SGraphicsWindow.PenColor=“Red”For i=1 to S step 1 GraphicsWindow.PenWidth=i Turtle.Move(Length) Turtle.Turn(E)EndFor第二题S=4Length=50E=360/SGraphicsWindow.PenColor=“Red”For i=2 to Length step 2 Turtle.Move(i) Turt

人人文库> 全部分类> 教育资料 > 课件下载

温馨提示

  • 1. 本站所有资源如无特殊说明，都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等，如果需要附件，请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸，网页内容里面会有图纸预览，若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间，仅对用户上传内容的表现方式做保护处理，对用户上传分享的文档内容本身不做任何修改或编辑，并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容，请与我们联系，我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

最新文档

评论

0/150

提交评论