【少兒編程】新課引入

　　例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+10 RT 120

　　.

　　.

　　.

　　停止命令

　　格式：STOP

　　功能：在過程中，當執行到這一條命令 時，就要立即停止過程的執行。 ?

　　“停止命令”能讓這個程序，在適當的時 候停下來。

　　TO SJLX ?:a

　　IF :a>200 THEN ?STOP

　　FD :a RT 120

　　SJLX :a+10

　　END

　　正多邊形螺旋線

　　TO DBLX :a :n

　　IF :a>200 THEN STOP

　　FD :a RT 360/:n

　　DBLX :a+10 :n

　　END

　　調用過程DBLX

　　DBLX ?30 ?4

　　DBLX ?30 ?5

　　TO WJXLX:a

　　IF :a>280 THEN STOP

　　FD :a RT 144 WJXLX :a+10

　　END

　　調用過程WJXLX

　　WJXLX 60

　　WJXLX 80

　　TO YUANL X:a

　　IF :a>200 THEN STOP

　　FD 3.14*:a/18 RT 10

　　YUANLX :a+0.5

　　END

　　調用過程

　　YUANLX 10

　　YUANLX 30

　　YUANLX 60

　　　　小結

　　畫正多邊形螺旋線的三大步驟：

　　1.適時停止；

　　2.畫一條邊，并轉到畫下一條邊的方向；

　　3.增加適當的邊長。

　　課內實踐

　　按要求畫出下面的圖形：

　　起始邊長為10，邊長每次增加4，最長邊長為100。

　　起始邊長為10，邊長每次增加5，最長邊長為100。

　　起始邊長為10，邊長每次增加1，最長邊長為200。

本站內容未經許可，禁止任何網站及個人進行轉載。