1 / 14

画 螺 旋 线

画 螺 旋 线. —— 过程的递归调用. 新课引入. 一、画正三角螺旋线. 例 1 :在过程“ SJLX” 中调用了它自己,试 推测“ SJLX 30” 能画出什么图形? TO SJLX :a FD :a RT 120 SJLX :a+10 END. (一)把“ SJLX 30” 展开来. FD 30 RT 120 FD 30+10 RT 120 FD 30+10+10 RT 120 FD 30+10+10+10 RT 120 FD 30+10+10+10 RT 120. 停止命令

fineen
Download Presentation

画 螺 旋 线

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript


  1. 画 螺 旋 线 ——过程的递归调用

  2. 新课引入

  3. 一、画正三角螺旋线 例1:在过程“SJLX”中调用了它自己,试 推测“SJLX 30”能画出什么图形? TO SJLX :a FD :a RT 120 SJLX :a+10 END

  4. (一)把“SJLX 30”展开来 FD 30 RT 120 FD 30+10 RT 120 FD 30+10+10 RT 120 FD 30+10+10+10 RT 120 FD 30+10+10+10 RT 120

  5. 停止命令 格式:STOP 功能:在过程中,当执行到这一条命令 时,就要立即停止过程的执行。 • “停止命令”能让这个程序,在适当的时候停下来。

  6. (二)画正三角螺旋线的过程 TO SJLX :a IF :a>200 THEN STOP FD :a RT 120 SJLX :a+10 END

  7. 二、画其它形状的螺旋线 (一)正多边形螺旋线 TO DBLX :a :n IF :a>200 THEN STOP FD :a RT 360/:n DBLX :a+10 :n END

  8. 调用过程DBLX DBLX 30 3 DBLX 30 4 DBLX 30 5

  9. (二)五角星螺旋线 TO WJXLX :a IF :a>280 THEN STOP FD :a RT 144 WJXLX :a+10 END

  10. 调用过程WJXLX : WJXLX 30 WJXLX 60 WJXLX 80

  11. (三)圆形螺旋线 TO YUANLX :a IF :a>200 THEN STOP FD 3.14*:a/18 RT 10 YUANLX :a+0.5 END

  12. 调用过程YUANLX YUANLX 10 YUANLX 60 YUANLX 30

  13. 小 结 画正多边形螺旋线的三大步骤: 1. 适时停止; 2. 画一条边,并转到画下一条边的方向; 3. 增加适当的边长。

  14. 课内实践 按要求画出下面的图形: 起始边长为10, 边长每次增加5, 最长边长为100。 起始边长为10, 边长每次增加1, 最长边长为200。 起始边长为10, 边长每次增加4, 最长边长为100。

More Related