Comenius Logo
Feladat: Rajzoljuk meg az alábbi sormintát.
A sormintát elemekből állítjuk elő: megrajzolunk egy négyzetet, s továbbá már csak ismételni fogjuk az első eljárást.
Létrehozzuk a p11 eljárást (p11 -a program neve), ahol az “a” a paraméter, amely a négyzet oldalának a nagyságát jelenti
A négyzetet piros színnel töltjük ki, majd a teknőcöt a négyzet jobb sarkába állítjuk
Programunk
tanuld p11 :a
tsz! 0
ism 4 [e :a j 360 / 4]
tf
e :a / 2
j 90
e :a / 2
tl
tsz! 12
tölt
tf
h :a / 2
b 90
h :a / 2
tl
tsz! 0
j 90
e :a
b 90
vége
Ha a p11 eljárással sikerült kirajzolni a négyzetet, akkor az a célunk, hogy a p22 eljárásban ismételjük meg az előző alakzat kirajzolását (ahányszor akarjuk).tanuld p22 :aism 5 [p11 :a] ebben az esetben a sormintánkban 5-ször lesz megismételve a legelső elem ( piros négyzet)e :a
b 90
e :a * 5
j 90
vége
Feladat: építsük tovább a sormintát (Rajzoljuk meg az alábbi sormintát, hivatkozzunk az előző két eljárásra)
tanuld main :a
ism 4 [p22 :a]
vége
Tanulság: több eljárás kapcsolódik egymásba