← Vissza a feladatokhoz
A grafikus programozás látványos rekurzív ábrája a fa, aminek Logo programja:
eljárás fa :év :hossz
előre :hossz
ha :év>1 [balra 60 fa :év-1 :hossz/2 jobbra 120
fa :év-1 :hossz/2 balra 60]
hátra :hossz
végeHa :év=1,2,3,4 értékkel meghívjuk, ezeket az ábrákat kapjuk.
Az egyes ábrákban 1, 3, 7, 15 darab szakasz található.
Kaptunk két másik fa rajzoló eljárást (fa, illetve a fa2–fa3 pár). Számold ki, hogy :év=2, 3, 4, 5-re hány darab szakaszból állnak (az első esetben felírhatod hármas számrendszerben is)! (A szakaszok elágazásig tartanak.)
A.
eljárás fa :év :hossz
előre :hossz
ha :év>1 [balra 60 fa :év-1 :hossz/2 jobbra 60
fa :év-1 :hossz/2 jobbra 60
fa :év-1 :hossz/2 balra 60]
hátra :hossz
végeB.
eljárás fa2 :év :hossz
előre :hossz
ha :év>1 [balra 60 fa3 :év-1 :hossz/3 jobbra 60
fa3 :év-1 :hossz/3 jobbra 60
fa3 :év-1 :hossz/3 balra 60]
hátra :hossz
vége
eljárás fa3 :év :hossz
előre :hossz
ha :év>1 [balra 60 fa2 :év-1 :hossz/3 jobbra 120
fa2 :év-1 :hossz/3 balra 60]
hátra :hossz
vége