Kristály
Készítsd el a következő kristály-fraktált rajzoló rekurzív eljárást (kristály(n,h)), ahol n a kristály szintszáma, h pedig a külső szakaszok hossza (Paul Bourke után szabadon)!
kristály(1,100)
kristály(2,100)
kristály(3,)100
kristály(6,100)
Hivatalos megoldás (HTML)
Készítsd el a következő kristály-fraktált rajzoló rekurzív eljárást (kristály(n,h)), ahol n a kristály szintszáma, h pedig a külső szakaszok hossza (Paul Bourke után szabadon)!
|
|
|
|
kristály(1,100) | kristály(2,100) | kristály(3,)100 | kristály(6,100) |
A kristály 4 fraktálból áll. A fraktál pedig ötször hívja önmagát.
eljárás rajz :n :h
ismétlés 4 [fraktál :n :h balra 90]
vége
eljárás fraktál :n :h
Ha :n>0 [fraktál :n-1 :h/3
fraktál :n-1 :h/3 balra 90
fraktál :n-1 :h/3 balra 180
fraktál :n-1 :h/3 balra 90
fraktál :n-1 :h/3]
ha :n=0 [előre :h]
vége
A. Van kristály eljárás; négyzet alapú 2+2 pont
B. kristály 1 100 jó 4 pont
C. kristály 2 100 jó 5 pont
D. kristály 3 100 jó 5 pont
E. kristály 4 100 jó 6 pont
F. kristály 6 100 jó 6 pont