Łączny wynik programu to: 5
Output image
Shawn KALAW - 1 rok temu
STARS
Shawn KALAW - 1 rok temu
EZ 5
Shawn KALAW - 1 rok temu
ht
lt 90
repeat 3 [fd 200 rt 360/3]
lt 90
repeat 4 [fd 200 rt 360/4]
fd 200 rt 90 fd 140
rt 90 fd 100 rt 90 fd 70 rt 90 fd 100 rt 90 rt 45 pu fd 50 pd
SETCOLOR 12 fill PU fd 50 fd 50 PD
SETCOLOR 9 fill pu rt 45 rt 45 fd 150 lt 45 fd 50 SETCOLOR 15 fill
Shawn KALAW - 1 rok temu
ht
lt 90
repeat 3 [fd 200 rt 360/3]
lt 90
repeat 4 [fd 200 rt 360/4]
fd 200 rt 90 fd 140
rt 90 fd 100 rt 90 fd 70 rt 90 fd 100 rt 90 rt 45 pu fd 50 pd
SETCOLOR 12 fill PU fd 50 fd 50 PD
SETCOLOR 9 fill pu rt 45 rt 45 fd 150 lt 45 fd 50 SETCOLOR 15 fill
Shawn KALAW - 1 rok temu
ht
lt 90
repeat 3 [fd 200 rt 360/3]
lt 90
repeat 4 [fd 200 rt 360/4]
fd 200 rt 90 fd 140
rt 90 fd 100 rt 90 fd 70 rt 90 fd 100 rt 90 rt 45 pu fd 50 pd
SETCOLOR 12 fill PU fd 50 fd 50 PD
SETCOLOR 9 fill pu rt 45 rt 45 fd 150 lt 45 fd 50 SETCOLOR 15 fill
Shawn KALAW - 1 rok temu
ht
lt 90
repeat 3 [fd 200 rt 360/3]
lt 90
repeat 4 [fd 200 rt 360/4]
fd 200 rt 90 fd 140
rt 90 fd 100 rt 90 fd 70 rt 90 fd 100 rt 90 rt 45 pu fd 50 pd
SETCOLOR 12 fill PU fd 50 fd 50 PD
SETCOLOR 9 fill pu rt 45 rt 45 fd 150 lt 45 fd 50 SETCOLOR 15 fill
Shawn KALAW - 1 rok temu
TO tree :size forward :size/6 right 25 tree :size/2 left 25 forward :size/3 right 25 tree :size/2 left 25 forward :size/6 left 30 tree :size*2/3 right 30 forward :size/3 if :size < 5 [ forward :size back :size stop ] END
clearscreen
tree 150
Shawn KALAW - 1 rok temu