Sorminta

Rajzold meg az alábbi ábrán látható sormintát az alap1(méret), alap2(méret) és sorminta(db,méret) eljárásokkal, ahol a db a sorban levő elemek számát jelöli, a méret pedig az alapelem méretét határozza meg! A sorban váltakozva pirossal és sárgával rajzold meg az alapelemeket!

Kétféle alapelemünk van, paraméterezzük, hogy melyikhez használjuk: 0 esetén alap1, 1 esetén alap2 következik.

eljárás sor :db :méret
sor :db :méret 0
bége

eljárás sor :db :méret :melyik
ha :db>0 [alap :méret :melyik
sor :db-1 :méret maradék :melyik+1 2]
vége

eljárás alap :méret :melyik
ha :melyik=0 [alap1 :méret köv :méret/8*7]
ha :melyik=1 [alap2 :méret köv :méret/2]
vége

eljárás alap1 :méret
ismétlés 4 [előre :méret jobbra 90 előre :méret jobbra 90
előre :méret balra 90]
töltőszín! „piros
tollatfel jobbra 45 e 5 tölt hátra 5 balra 45 tollatle
vége

eljárás alap2 :méret
tollatfel hátra :méret/2 tollatle kör :méret
töltőszín! „sárga tölt tollatfel előre :méret/2 tollatle
vége

alap1

A. Van kereszt; piros; paraméteres 5+3+2 pont

alap2

B. Van kör; sárga; :mérettel paraméteres 2+3+3 pont

sorminta

C. Van sor; egy sorban több alapelem; egymás mellett; felváltva 1+2+2+5 pont

D. A sor paraméteres a :db-re; :méret-re 3+3 pont

E. Jó a sorminta 1 50 2 pont

F. Jó a sorminta 2 50 3 pont

G. Jó a sorminta 3 50 4 pont

H. Jó a sorminta 4 40 3 pont

I. Jó a sorminta 5 30 4 pont