Logo‎ > ‎Feladatok‎ > ‎

Egyszerű rekurzív ábrák

Példák

Négyzetek

Belülről kifelé halad.

eljárás rekA :h :db
 ha :db > 0 [
   ism 4 [e :h j 90]
   tf h 10 j 90 h 10 b 90 tl
   rekA :h+20 :db-1
 ] 
vége

Indítás: rekA 20 20

Háromszögek

Kívülről befelé halad.

eljárás rekB :h :db
 ha :db > 0 [
   ism 3 [e :h j 120]
   e :h/2  j 60
   rekB :h/2 :db-1
 ]
vége

Indítás: rekB 300 8

Feladatok

Készítsünk rekurzív programot az alábbi ábrák megrajzolására!
  1. CÉLTÁBLA :N :R :D
    :N a körök száma, :R a legkisebb kör sugara, :D a szomszédos körök távolsága.

  2. PIRAMIS :N :H
    :N az emeletek száma, :H egy kis háromszög oldalának hossza

Comments