В рамках кружка "Программирование виртуального робота на языке Logo в среде Kturtle" Михаилу , ученику 4 класса, удалось укротить черепашку, в результате чего последняя нарисовала новогодний пейзаж. А все потому, что Миша придумал хитрый код и реализовал его по полной. Молодец, Миша! Вперед, Logo! Будем считать, это только начало. Впереди нас ждут новые интересные программы.
Следует добавить, что заливку фигур Миша выполнил неслыханным и невиданным (даже в "этих ваших интернетах") ранее способом. И вообще, надо признать что заливки в Kturtle как таковой нет. Однако это не остановило юного кодера и елка полностью стала зеленой.
###
reset
turnleft 270
pencolor 255, 255, 255
canvascolor 0, 0, 210
###
$w=100
$x=$w/2
$y=400-($w/2)
go $x,$y
penwidth $w
forward 400-$w
###
$p=60
$y=280
$a=120
$c=ask"Предлагаю новогоднюю елочку высотой от 2 до 5 метров-ярусов (2 или 5)?"
if $c>5 {
$c=5
}
penwidth 2
pencolor 0, 175, 0
repeat $c {
direction 225
repeat 90 {
go 200,$y
forward $a
turnright -1
}
$y=$y-$p
$a=$a-20
$p=$p-10
}
###
learn star $x,$y,$d,$c {
repeat $c {
go $x,$y
forward $d
turnright 360/$c
}
}
pencolor 255,255,255
repeat 30 {
$d=round random 10,400
$b=round random 10,300
star $d,$b,10,8
}
go 50,350
#
В результате
Спустя немного времени....
