fd 100 rt 90 bk 100 lt 90

fd 100

rt 90

bk 100

lt 90

cs

cs fd 100 rt 360 bk 100 lt 180

pu fd 100

pd fd 100

ht (st)

setpencolor “red fd 100

setpensize 20 fd 100

cs pu setpencolor "blue setpensize 50 bk 100 ht st

Arc 360 100

Arc 180 50

Label “Shalom 123

Setlabelheight 30 label “Shalom 123

cs repeat 10 [arc 360 100 pu fd 10 pd]

for [i 1 10] [label : i fd 30] Label 1 fd 30 Label 2 fd 30 Label 3 fd 30 Label 4 fd 30 Label 5 fd 30 Label 6 fd 30 Label 7 fd 30 Label 8 fd 30 Label 9 fd 30 Label 10 fd 30

for [k 0 15] [setcolor : k arc 360 : k*10] setcolor 0 arc 360 0 setcolor 1 arc 360 10 setcolor 2 arc 360 20. . . Setcolor 15 arc 360 150

! ית על / ת תותח / מי שפותר , שאלה קשה בטירוף cs fd 50 pu rt 90 for [i 1 10] [for [j 1 10] [label : i*: j fd 30] bk 300 rt 90 fd 30 lt 90]

cs repeat 1000 [setpencolor random 16 fd random 100 rt random 360]

pu setxy -150

pu setxy 400 -200

? איפה הצב pos, xcor, ycor

filled “blue [repeat 4 [fd 100 rt 90]]

to square repeat 4 [fd 100 rt 90] end

Repeat 180 [square rt 2]

קשת בענן CTRL-ENTER