tekitár – grafikus programozási verseny feladatok

Mit rajzol az alábbi Logo program (az eljárás teljes szövege –a 3. és a 4. sor– az elágazás akkor-ágán van, csak akkor hajtható végre, ha a :száml>0)?

A. Rajzold le a rek1 20 2 6 10 hívás eredményeképp keletkező ábrát!

B. Rajzold le a rek1 20 3 6 10 hívás eredményeképp keletkező ábrát!

C. Rajzold le a rek1 20 4 6 10 hívás eredményeképp keletkező ábrát!

D. Rajzold le a rek1 20 6 6 10 hívás eredményeképp keletkező ábrát!

tanuld rek1 :hossz :n :száml :növ
 ha :száml>0 
  [ismétlés :n [előre :hossz jobbra 90] 
   rek1 :hossz+:növ :n :száml-1 :növ]
vége

TO rek1 :hossz :n :száml :növ
  IF :száml>0 THEN
    REPEAT :n [FORWARD :hossz RIGHT 90]
    rek1 :hossz+:növ :n :száml-1 :növ]
END

Rekurzió