Téglalapok

Készítsd el a tégla(h,szín) és a sok(db,h,szín) eljárásokat, amelyek a mintának megfelelő ábrákat rajzolják! A h paraméter a legkülső tégla rövidebb oldalának a hossza, a db a téglalapok száma, a szín pedig a legkülső tégla színét jelenti. A rövidebb oldal feleakkora, mint a hosszabb. Az eggyel beljebb levő téglalap hosszabb oldala annyi, mint az őt tartalmazó rövidebb oldala. A vonalak színe felváltva piros és kék (P=piros, K=kék). A vonalak vastagsága is változik, a legkülső a legvastagabb, majd a toll vastagsága egyesével csökken.

Alap rekurzív feladat.

eljárás tégla :szint :méret :szín
ha :szint >0 [hakülönben :szín="P [tollszín! "piros]
[tollszín! "kék]
tollvastagság! :szint
ismétlés 2 [előre :méret jobbra 90
előre 2*:méret jobbra 90]
tollatfel előre :méret/4 tollatle
hakülönben :szín="P [tégla :szint-1 :méret/2 "K]
[tégla :szint-1 :méret/2 "P]
tollatfel hátra:méret/4 tollatle]
vége

tégla

A. Záródó téglalap; rövidebb oldal fele a nagyobbénak; színnel; és mérettel paraméteres
1+1+1+1 pont

sok

B. Paraméterrel meghatározott számú; 2:1 oldal arányú téglalapot rajzol 1+1 pont

C. A legkülső téglalap méretét a paraméter szabályozza; a benne levők mindig fele akkorák
1+1 pont

D. A téglalapok különböző méretűek, rendre egymás belsejében találhatóak 2+2 pont

E. A rövidebb oldaluk egy egyenesen fekszik; bal oldali rövidebb oldalon 2+2 pont

F. A kisebb téglalapok egyforma távolságra vannak az őket tartalmazók vízszintes oldalaitól 2 pont

G. A téglalapok színe kívülről kezdve piros; kék; piros; ...mind jó 1+1+1+2 pont

H. Különböző vonalvastagságok; a vastagság a mérettől függ; kívülről csökkenő 1+2+2 pont

I. Jó a sok 4 200 ”P 2 pont