Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Rekursive funktionen

    Delphi
    by ToFaceTeKilla, 28. Mai 2009
  Änder am besten den Namen der Function oben in der Unit, sonst musst du sie überladen.
  (Natürlich musst du den Namen dann überall ändern, sowohl in der Implementation
  function summiere(n:integer): integer;
  begin
  if n=1 then result:=1
  else result:=n+summiere(n-1)
  end;
  als auch im Aufruf
  procedure TForm1.Button1Click(Sender: TObject);
  var n,erg:integer;