Články

Staré články Rekurze II. Scheme interace vs. rekurze Obrácený řetězec Limita funkce Referáty Kvadratická rovnice Dr. Scheme Liebintzova řada Aritmetika kongruencí Eulerova mocnina

Interace vs. Rekurze

Víte jaký je rozdíl mezi interací a rekurzí? Interace je běžná zbraň programátora, který chce aby se určitý segment kódu opakoval tolikrát, dokaď se nesplní podmínka ukončení. Rekurze pracuje úplně stejným způsobem, jen je těžší na implementaci, ale výsledný algoritmus stojí za to. Leč v normálním programování se rekurzivní fce a procedury využívají minimálně, člověk by ale měl znát i další způsoby jak opakovat segmenty kódu.Všechny tyto algoritmy jsem napsal já a tak se omlouvám za případné chyby.

Public Sub vypis()
Dim x As Integer
For x = 1 To 10
MsgBox "ahoj Světe"
Next x
End Sub

Vypsání textu "ahoj světě" 10 krát na výstup pomocí interace

Public Sub vypis(ByRef x As Integer)
If x >= 1 Then
MsgBox "ahoj Světě"
vypis (x - 1)
End If
End Sub

Vypsání textu "ahoj světe" 10 krát na výstup pomocí rekurze

Public Sub napln_pole()
Dim pole(1 To 10) As Integer
Dim x As Integer
For x = 1 To 10
pole(x) = x
Next x
End Sub

Zápis hodnoty proměnné x do prvků pole pomocí interace

Public Sub napln_pole(ByRef x As Integer)
Dim pole(1 To 10) As Integer
If x <= 10 Then
pole(x) = x
napln_pole (x + 1)
End If
End Sub

Zápis hodnoty proměnné x do prvků pole pomocí rekurze

nahoru