2012年LOGO培训资料.doc

数学运算符号与LOGO运算符号的对比 运算符号 加 减 乘 除 数学运算符号 + — × ÷ LOGO运算符号 + — * / 注意分数： 2÷7—— 2/7 数学中的算式 LOGO语言中的表达式 计算结果 60 ÷15+15 60/15+15 Result: 19 60 ×15-15 60 *15-15 Result: 885 （2.8+）÷1.7 （2.8+3/5）/1.7 Result: 2 第一课：字符串表达式 hello 72/(15+9) Print 72/(15+9) print [72/(15+9)] 灵活多变的小海龟 To dbx :n Repeat :n[fd 30 rt 360/:n] End 执行：dbx 5 递归过程 To wbx Fd 60 rt 72 (360/5) Wait 50 Wbx End LOGO培训 带变量的尾递归过程 To wbx :l (5边形的边长) Fd :l rt 360/5 (360/5) Wait 50 (等0.5秒 50/100) Wbx :l End 执行：wbx 60 (:l) 试一试： To cfx :l :h Fd :l rt 90 wait 30 fd :h rt 90 Wait 30 Cfx :l :h End 变量的增加与减少 To wbx :l (5边形的边长) Fd :l rt 360/7 (360/5) Wait 50 (等0.5秒 50/100) Wbx :l+5 （每一次递归增加5） End Wbx 10 15 20 画图形：递归、大小、转弯 To ex71 :l If :l100 then stop Repeat 3[fd :l rt 120] Rt 20 Wait 20 Ex71 :l+2 End P36试一试 2、 to ex42 Print [您的性别] Make “g read If :g=[0] then stop Print [您的身高（厘米）：] Make “h read If :g=[男] then make “w :h-105 If :g=[女] then make “w :h-100 (print [您的标准体重（千克）应该是：] :w) Ex42 End 3、to yuan print [请输入圆的半径:] make “r read if :r=0 then stop make “s 3.14*:r*:r (print [圆的面积是:] :s) Yuan end 第八课 小海龟画圆塔 To ex81 :r :x If :r1 then stop Setpc :x Stampoval :r :r Pu fd 2 pd Ex81 :r*0.9 :x End 第九课 小海龟画彩色同心圆 To yuan :r :c If :r10 then stop Setpc :c Stampoval :r :r Wait 20 Yuan :r-10 :c End To ta :r(边长) :x（已画） :n（要画） :c（颜色） Setpc :c If :n=:x then stop Repeat 2[fd 20 rt 90 fd :r rt 90] Fd 20 wait 20 Ta :r-10 :x+1 :n :c End 上册：第八课 圆和弧 P46 8-8 画圆 Repeat 36[fd 1 rt 10] 360/36 Repeat 360[fd 1 rt 1] 360/360 TO SAN REPEAT 18 [RT 5 FD 60 * 0.174 RT 5] LT 180 REPEAT 3 [REPEAT 18 [LT 5 FD 20 * 0.174 LT 5] LT 180] REPEAT 9 [RT 5 FD 60 * 0.174 RT 5] LT 90 FD 8 PU BK 50 PD BK 160 rt 180 REPEAT 18 [lT 5 FD 20 * 0.174 lT 5] END 画小树叶(过程的调用) To shuye Repeat 2[repeat 9[fd 5 rt 10] rt 90] End To shumiao Fd 50 lt 90 Shuye Rt 90 fd 20 Shuye Fd 60 lt 90 Shuye Rt 90 fd 20 Shuye End To lbx Repeat 6[fd 100 repeat 5[fd 30 rt 144] rt 60] End Repeat 3[fd 70 repeat 4[fd 20 rt 9