2012年苏州市小学生LOGO程序设计竞赛答案_林老师的LOGO_PYTHON_C语言之家

http://blog.sina.com.cn/u/1607750864

首页博文目录关于我

个人资料

微博

加好友发纸条

写留言加关注

博客等级：
博客积分：

博客访问：
关注人气：
获赠金笔：0支
赠出金笔：0支
荣誉徽章：

正文字体大小：大中小

2012年苏州市小学生LOGO程序设计竞赛答案

(2013-06-26 09:02:23)

标签：

林老师

logo语言

编程

分形

竞赛试卷

分类：竞赛试题及解题分析指导

《信息技术》课及信息技术竞赛使用MSWLogo已成主流和趋势：

● 汉化版MSWLogo性能比肩PASCAL、C语言，功能远超PC-LOGO及其它类型LOGO语言。

汉化版MSWLogo继承了PC-LOGO的使用习惯及资料，可轻松实现转型，是最优升级语言。

《MSWLogo讲义》电子书是详尽的使用说明书及编程指导手册, 学用MSWLogo不再困难

《MSWLogo讲义》第1-3章是以小学《信息技术》教材为蓝本的入门学习、编程操作参考书

第4-7章是小学信息学竞赛必须掌握的递归、数值计算、字表处理参赛辅导书

第8-10章详解了MSWLogo的新颖编程技巧、3D作图新功能，有许多精彩编程实例

新编制的MSWLogoHelp文件可以在XP～Win10中阅读，常用的命令都有中文注解。

● 《新编PC-LOGO教程》《新编PC-LOGO习题集》是迄今最详尽的PC-LOGO语言教科书

《新编PC-LOGO教程》《新编PC-LOGO习题集》有超过1000道程序例题这是以往历年教学资料的积淀

已经有纸质《LOGO语言竞赛教程》《LOGO语言竞赛习题集》书籍的就不要再购买这两本电子书了

计算机升级Win7～Win10及更高系统操作系统PC-LOGO无法使用，PC-LOGO渐被淘汰已成定局。

其它中文LOGO系统都存在种种问题，无法编制复杂有水平的LOGO程序，影响学习编程及举办竞赛。

《新编PC-LOGO教程》《新编PC-LOGO习题集》可为学习MSWLogo提供丰富的练习例题及编程思路

汉化MSWLogo是当前和未来时代的最优LOGO语言系统 ● PC-LOGO是昔日LOGO语言的王者

● 以上三本书的目录请查阅: http://blog.sina.com.cn/s/blog_5fd454d00102x1we.html

希望获得《MSWLogo讲义》或《新编PC-LOGO教程》《新编PC-LOGO习题集》电子书的

用手机或计算机淘宝搜索 MSWLOGO 或 mswlogo 即可找到购买链接

2012年苏州市小学生LOGO程序设计竞赛答案

这些是苏州市2012年小学生LOGO程序设计竞赛复赛练习题或上机题的答案。通过这些资料我们已经能够比较全面地了解有关这次竞赛的细节了。但是，林老师认为这些“答案”是比较粗糙的，在编程上有许多值得改进提高的地方，借此和大家共同探讨怎样编写出既符合题目要求、且是高水平的LOGO程序。

1.画如图大丽花

TO HUA_
draw
bk 50 fd 50
hua2
fd 70
pu fd 40 pd
hua1
END

to hua1
repeat 12[repeat 2[repeat 90[fd 40*pi/180 rt 1]rt 90]rt 30]
end

to hua2
lt 90
repeat 2[repeat 90[fd 70*pi/180 rt 1]rt 90]
repeat 90[fd 70*pi/180 rt 1]home
repeat 2[repeat 90[fd 70*pi/180 rt 1]rt 90]
repeat 90[fd 70*pi/180 rt 1]home
end

2.画"新村小区"

TO FZ_
pu fd 120 pd
ty
pu bk 250 pd
fz1 2 rt 90 fd 50+2*8 lt 90
fz1 4 rt 90 fd 50+4*8 lt 90
fz1 6 rt 90 fd 50+6*8 lt 90
fz1 8 rt 90 fd 50+8*8 lt 90
fz1 10 rt 90 fd 50+10*8 lt 90
setpc 0
rt 90 bk 540 lt 90
ht
END

to fz1 :b
setpc 9
repeat 4[fd :b*8 rt 90]
rt 90 fd :b lt 90
repeat 2[fd :b*5 rt 90 fd :b*2.5 rt 90]
rt 90 fd :b*5 lt 90 pu fd :b*5.5 pd
repeat 4[repeat 4[fd :b*1.2 rt 90]rt 90]
pu fd :b*2.5 lt 90 fd :b*7 rt 120 pd
repeat 3[fd :b*10 rt 120]
rt 60 fd :b lt 90 bk :b*8
end

to ty
setpc 12
pd (stampoval 15 15 "true)
repeat 18[pu fd 18 pd fd 8 pu bk 26 rt 360/18]
rt 360/36
repeat 18[pu fd 18 pd fd 16 pu bk 34 rt 360/18]
lt 10
pd
end

3.画通风管道

TO FXX
fx1 20 30
END

to fx1 :n :b
if :n=0 stop
repeat 4[fd :b rt 90]
pu fd 3 rt 90 fd 3 lt 90 pd
fx1 :n-1 :b+3
end

4.画五角星花枝

TO STAR
draw
repeat 5[star1 12 30 rt 360/5]
END

to star1 :n :b
if :n=0 stop
fd 10 lt 45 fd :b stampoval 3 3 bk :b
rt 90 fd :b stampoval 3 3 bk :b
lt 45
star1 :n-1 :b-2
bk 10
end

5.在屏幕上画出鱼在水中有用的动画

TO DH
yudong 120
END

to yudong :n
if :n=0 pu home pd yu pu home fd 100 pd xian stop
pu home fd 100 pd xian
pu setxy se 5*:n 0 pd
yu
wait 1
clean
yudong :n-1

end

to xian
rt 90 fd 650 bk 600 lt 90
pu bk 10 pd
rt 90 fd 570 bk 450 lt 90
pu bk 10 pd
rt 90 fd 420 lt 90
end

to yu
make "x1 xcor make "y1 ycor
pu rt 90 fd 30 lt 90 pd fd 60
setxy se :x1 :y1
pu rt 90 fd 30 lt 90 pd bk 60
setxy se :x1 :y1
pu rt 90 fd 30 lt 90 pd
make "x2 xcor make "y2 ycor
pu rt 90 fd 15 lt 90 pd fd 30
setxy se :x2 :y2
pu rt 90 fd 15 lt 90 pd bk 30
setxy se :x2 :y2
seth 90
pu bk 30 pd
fd 10 (stampoval 5 5 "true)
pu bk 10 pd
seth 0
end