2、帶變量的LOGO過程

1、編寫帶參數(shù)的命令帶變量的LOGO過程復 習定義過程的方法： 過程名 一條或多條命令新課導入一、帶一個參數(shù)的過程命令中有一個可變的數(shù)字的例子：用重復命令畫圓的方法：REPEAT 360FD 半徑*3.14/180 RT 1 這是可變的數(shù)字 定義帶變量的過程方法：TO 過程名 :變量 一條或多條命令（命令中含有變量）ENDTO YUAN :r REPEAT 360FD :r*3.14/180 RT 1END例1 定義一個帶參數(shù)的過程，要求能畫出不同半徑的圓，并調(diào)用這個過程畫出半徑分別為20、40、60的圓，寫出命令。例1答案（一）定義過程TO YUAN :rREPEAT 360 FD :r*3.1

2、4/180 RT 1END（二）運行？DRAW？YUAN 20？YUAN 60？YUAN 80？二、帶兩個參數(shù)的過程命令中有一個可變的數(shù)字的例子用重復命令畫圓的方法：REPEAT 邊數(shù)FD 邊長 RT 360/邊數(shù) 這些是可變的數(shù)字例2 定義一個帶參數(shù)的過程，要求能畫出不同邊數(shù)的正多邊形。并且定義一個新過程，調(diào)用這個過程，分別畫出邊長為50，顏色不同的正3、4、5、6邊形。例2答案（一）定義過程 TO DBX :n :a REPEAT :nFD :a RT 360/:n END（二）畫四個多邊形的過程TO CAISEDBX DRAW LT 90 SETBG 7SETPC 11 DBX 3 50

3、SETPC 12 DBX 4 50SETPC 13 DBX 5 50SETPC 14 DBX 6 50 HTEND（三）運行？CAISEDBX？三、多彩的泡泡例3：畫多彩的泡泡（一）定義過程TO PAO :r :a SETPC :a （STAMPOVAL :r :r “TRUE）END例3答案（二）畫四個彩色泡泡的過程TO CAIPAOPAODRAW SETBG 7 PAO 60 10PU FD 130 PD PAO 30 12PU RT 90 FD 130 PD PAO 50 14PU RT 90 FD 130 PD PAO 20 9END（三）運行 ？CAIPAOPAO ？小 結過程分為兩

4、種：帶參數(shù)的過程和不帶參數(shù)的過程。取有意義的過程名定義過程時，參數(shù)前的“:”不要漏掉。調(diào)用過程時，各參數(shù)的順序不能顛倒。課內(nèi)實踐1. 請將過程“CAIQIQIU”補充完整，畫出下圖。TO QIQIU :a :c SETPC :c FD :a RT 90 REPEAT 360FD 3.14*:a/180 LT 1 LT 90 BK :aENDTO CAIQIQIUDRAW RT 45 PU BK 200 PD LT 45QIQIU 10 2RT 45 PU FD 50 PD LT 45 調(diào)用“QIQIU”，圓半徑=15 移動位置 調(diào)用“QIQIU”，圓半徑=20 移動位置 調(diào)用“QIQIU”，圓半徑=25 移動位置 調(diào)用“QIQIU”，圓半徑=30HTEND通