best. rekursive funktion erklären

[Delphi-Joe]

hallo,

hab eine problem beim verstehen folgender rekursiven funktion:

Delphi-Quellcode:

function funktion(x, y:byte): byte; 
begin 
  if (x<>2*y) then
    funktion:=funktion(x-1,y-1) + funktion(x,y);
end;

könnt ihr mir das prinzip erklären?

[barnti]

Hallo,

das wird schwer. Die Funktion liefert kein Ergebnis!

[Dax]

Hi!

Wenn x doppelt so groß ist wie y, legt diese Funktion deinen Rechner lahm, ansonsten liefert sie, wie barnti schon gesagt hat, kein Ergebnis.

[Delphi-Joe]

es kommt ja nur auf die funktionsweise an. was wird getan? vielleicht ist es leichter mit einem struktogramm zu erklären?

[Nikolas]

Das mit dem fehlenden Ergebniss stimmt nicht!
Wenn man dem Funktionsnamen einen Wert zuweisst, ist das gleichbedeutend mit einer Zuweisung an result.

Kannst du vielleicht mal erklären, was diese Funktion ausrechnet? Dann könnte es einfacher werden sie zu verstehen

[dizzy]

Für x<>2*y ist es eine Endlosrekursion, und für alle anderen Fälle ist die Rückgabe unbestimmt. So ziemlich das sinnlosete was ich bisher gesehen hab :mrgreen:

[Delphi-Joe]

Das diese Rekursion eine Endlosrekursion ist ändert doch nicht an der Tatsache, das der Computer die Daten verarbeitet? Die Frage ist nun, was der Computer bei dieser speziellen Rekursion arbeitet und wie Toxman vorhin schon richtig bermerkt hat, gibt es in diesem Beispiel Rückgabe.

[alcaeus]

Hi Delphi-Joe,

Ergebnis wirds keins geben. Das hängt einfach damit zusammen, dass selbst falls die Rekursion nicht unendlich wäre, trotzdem kein Ergebnis zugewiesen wird. Das heißt, an der Wurzel des Rekursionsbaumes gibts nur ein undefiniertes Ergebnis, somit sind alle weiteren Ergebnisse auch undefiniert.

Greetz
alcaeus

[Blechwolf]

Zitat:

Zitat von Toxman

Das mit dem fehlenden Ergebniss stimmt nicht!
Wenn man dem Funktionsnamen einen Wert zuweisst, ist das gleichbedeutend mit einer Zuweisung an result.

Wie Toxman schon richtig gesagt hat, kann die Funktion durchaus ein Ergebnis zurückliefern. Damals bei Turbo/Borland Pascal gabs sowas wie ein Result noch nicht. Da ging das nur so.

Was die Funktion macht ist so relativ schwierig zu erklären. Setz doch einfach mal ein paar Werte für x und y ein und dann guck Dir das Ergebnis an. Wenn Du dann ne Vermutung hast, kannst Du die mit Vollständiger Induktion beweisen und weißt wie das ganze im Allgemeinen Fall aussieht. RWTH Aachen Informatik Grundstudium 1. Semester... (Kluuuugscheißer...)
:warn:

Problematisch an der Sache ist der zweite Teil der Addition. Da die Funktion mit den unveränderten Werten wieder aufgerufen wird, hast Du quasi ne schöne Schleife.
Ich versuch mal ein Ablaufdiagramm zu malen und Dir das dran zu hängen...

Grüße

Wolf

[Niels]

Zitat:

Zitat von Blechwolf

Zitat:

Zitat von Toxman

Das mit dem fehlenden Ergebniss stimmt nicht!
Wenn man dem Funktionsnamen einen Wert zuweisst, ist das gleichbedeutend mit einer Zuweisung an result.

Wie Toxman schon richtig gesagt hat, kann die Funktion durchaus ein Ergebnis zurückliefern. Damals bei Turbo/Borland Pascal gabs sowas wie ein Result noch nicht. Da ging das nur so.
...

Hallo,
das ist schon richtig, dass man anstatt result den Funktionsnamen benutzen kann. Jedoch endet die Rekursion wenn x = 2*y. Wenn dieser Fall eintritt wird jedoch kein Ergebnis zugewiesen. Das "else" fehlt hier also.

Ich persönlich seh in der Funktion auch keinen Sinn.

MfG Niels

[edit]
Mir ist grad nochwas aufgefallen. Der rechte Teil der Zuweisung

Delphi-Quellcode:

funktion:=funktion(x-1,y-1) + funktion(x,y);

wird immer wieder mit den Ausgangswerten aufgerufen. Ein Funktionsaufruf endet also immer in einer Endlosrekursion, außer auf die Ausgangswerte trifft zu: x = 2*y. Hier kommt's aber zu dem oben bereits erklärten Problem (unbestimmtes Ergebnis, was eben grad an der Stelle im RAM steht).
[/edit]