Registriert seit: 11. Apr 2003
Ort: Moestroff (Luxemburg)
3.741 Beiträge
Delphi 2007 Professional
|
Re: best. rekursive funktion erklären
12. Nov 2004, 17:54
Zitat von Delphi-Joe:
Delphi-Quellcode:
function funktion(x, y:byte): byte;
begin
if (x<>2*y) then
funktion:=funktion(x-1,y-1) + funktion(x,y);
end;
Zitat von glkgereon:
Delphi-Quellcode:
function funktion(x, y:byte): byte;
begin
if (x<>2*y) then
funktion:=funktion(x-1,y-1) + funktion(x,y);
end;
Bitte wo ist denn da der Unterschied
|