Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Pascalsches Dreieck...Brauche dringend Hilfe!!!!! (https://www.delphipraxis.net/94696-pascalsches-dreieck-brauche-dringend-hilfe.html)

JuleMaus 25. Jun 2007 18:17


Pascalsches Dreieck...Brauche dringend Hilfe!!!!!
 
Hallo Leute!

Ich bräuchte dringend Hilfe! Unser Lehrer hat uns bis donnerstag eine Hausaufgabe aufgegeben,die bewertet wird und zwar sollen wir das Pascalsche Dreieck programmieren! Und ich blicke da nicht so richtig durch. :pale: was er uns nur gegeben hat,war des Quelltext zur rekursiven Lösung,der weiter zu führen ist!

Delphi-Quellcode:
function pas3(Reihe,Wert:Byte):Integer;
begin
  if ((wert=0) or (wert=reihe))
    then result:1
    else result:=pas3(reihe-1,wert-1)+pas3(reihe-1,wert);
end;
Aber ich schaffe nicht es weiter zu führen! Könnt ihr mir helfen,ich dreh sonst noch durch!

Liebe Grüße
Jule

[edit=r_kerber]Delphi-Tags eingefügt! Das nächste Mal bitte selbst machen. Mfg, r_kerber[/edit]

lbccaleb 25. Jun 2007 19:36

Re: Pascalsches Dreieck...Brauche dringend Hilfe!!!!!
 
Liste der Anhänge anzeigen (Anzahl: 1)
meinst du das ungefähr so?? ich hab dir das mal gemacht nach dem bsp was ich auf dieser seite hier gefunden hab:

lösungen

Polynom 25. Jun 2007 19:48

Re: Pascalsches Dreieck...Brauche dringend Hilfe!!!!!
 
Hallo !

Mal ne ganz dumme Frage: Darf man diese Lösung als "rekursiv" bezeichnen?
Ich dachte Rekursion bedeutet, dass sich eine Funktion selbst aufruft ... diese Lösung nutz aber doch Schleifen ...

Mit freundlichen Grüßen, Michael

Namenloser 25. Jun 2007 21:10

Re: Pascalsches Dreieck...Brauche dringend Hilfe!!!!!
 
Wieso, sie ruft sich doch selbst auf? Also ist sie doch auch rekursiv :gruebel:


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:51 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz