![]() |
Schnelle einführung in die Rekursion gesucht
Sooodele
schreib übermorgen meine Info Klausur bin alles durchgegangen und sieht soweit ganz gut aus nur das mit der Rekusrion versteh ich noch nicht so GANZ könnte mir jemand von euch schlauen Köpfen hier vielliecht eine schnelle Einführung geben? vll mit einem kleinen Code Beispiel?? währe nett so long thx im Vorraus Timo/dahui |
Re: Schnelle einführung in die Rekursion gesucht
Delphi-Quellcode:
Einfachstes Beispiel und es sollte selbsterklärend sein :)function fakultaet(n: integer): integer; begin if (n < 2 then) Result := 1 else Result := n*fakultaet(n-1); //rekursiver aufruf end; |
Re: Schnelle einführung in die Rekursion gesucht
Hi!
Also, was Rekursion ist weißt du ja bestimmt schon... (Eine Prozedur ruft sich selbst wieder auf...) Eine typische rekursive Aufgabe ist (neben der Fakultät) z.B. der Quicksort-Algorithmus...
Delphi-Quellcode:
Wenn du den verstanden hast, dann wirst du in der Klausur keine Probleme haben...
procedure QuickSort(var A: array of Integer; iLo, iHi: Integer);
var Lo, Hi, Mid, T: Integer; begin Lo := iLo; Hi := iHi; Mid := A[(Lo + Hi) div 2]; repeat while A[Lo] < Mid do Inc(Lo); while A[Hi] > Mid do Dec(Hi); if Lo <= Hi then begin T := A[Lo]; A[Lo] := A[Hi]; A[Hi] := T; Inc(Lo); Dec(Hi); end; until Lo > Hi; if Hi > iLo then QuickSort(A, iLo, Hi); if Lo < iHi then QuickSort(A, Lo, iHi); end; (Ist schon schwieriger, als der Fakultäts-Algorithmus...) ;) Viele Grüße, Chris |
Re: Schnelle einführung in die Rekursion gesucht
und wenn nicht o.O
|
Re: Schnelle einführung in die Rekursion gesucht
|
Re: Schnelle einführung in die Rekursion gesucht
Zitat:
|
Re: Schnelle einführung in die Rekursion gesucht
Zitat:
|
Re: Schnelle einführung in die Rekursion gesucht
Zitat:
Trotzdem hier nochmal n anderer Link: ![]() mfg Christian |
Re: Schnelle einführung in die Rekursion gesucht
jo danke euch allen pfff Rekursives Threadaufrufing >.< ^^
werd mir das mal durchlesen r2 :D danke |
Alle Zeitangaben in WEZ +1. Es ist jetzt 20:26 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz