Pontok
Készítsd el az alábbi ábrákat rajzoló eljárásokat (ág(db,l,v), ágak(n,db,l,v)), amelyek különböző méretű fekete pontokból készültek! A db a pontok száma (10-nél biztosan több), l a pontok közötti elmozdulás, v a kezdő tollvastagság. A pontok mérete lépésenként eggyel növekszik, az utolsó 10 lépésnél pedig lépésenként öttel. Az ágak eljárás :n darab ágat rajzoljon, a minta szerint!
ág(15,10,10)
ág(20,5,10)
ág(25,8,1)
ágak(4,25,4,1)
ágak(5,20,5,15)
ágak(7,30,5,20)
Hivatalos megoldás (HTML)
Készítsd el az alábbi ábrákat rajzoló eljárásokat (ág(db,l,v), ágak(n,db,l,v)), amelyek különböző méretű fekete pontokból készültek! A db a pontok száma (10-nél biztosan több), l a pontok közötti elmozdulás, v a kezdő tollvastagság. A pontok mérete lépésenként eggyel növekszik, az utolsó 10 lépésnél pedig lépésenként öttel. Az ágak eljárás :n darab ágat rajzoljon, a minta szerint!
ág(15,10,10) | ág(20,5,10) | ág(25,8,1) |
ágak(4,25,4,1) | ágak(5,20,5,15) | ágak(7,30,5,20) |
Az ábrákat pontokból kell összerakni, ahol a pontos mérete a rajz során kétféleképpen is változik.
eljárás ág :m :h :vast
tollvastagság! :vast tollatle
ismétlés :m-10 [tollvastagság! tollvastagság+1 pont előre :h]
ismétlés 10 [tollvastagság! tollvastagság+5 pont előre :h]
tollatfel hátra :m*:h tollvastagság! 1 tollatle
vége
eljárás ágak :n :m :h :vast
tollatfel
ismétlés :n [ág :m :h :vast balra 360/:n]
tollatle
vége
A. Az ág egymáshoz képest eltolt; növekvő méretű pontokból áll; az utolsó 10 gyorsabban növekszik 2+2+3 pont
B. Az ág 30 5 20 jó 3 pont
C. Az ág 25 4 1 jó 3 pont
D. Az ág 20 5 15 jó 3 pont
E. Az ágak több ágat rajzol; jól elforgatva 2+3 pont
F. Az ágak 4 15 10 10 jó 3 pont
G. Az ágak 5 20 5 10 jó 3 pont
H. Az ágak 7 25 8 1 jó 3 pont