Referat - ggT Delphi, Dokumentation
Dieses Referat wurde vom Mitglied Börni_87 veröffenlicht. Pausenhof.de ist für die Inhalte der Veröffentlichungen der Mitglieder nicht verantwortlich.
Problem: Der größte gemeinsame Teiler soll mit Hilfe einer Rekursion ermittelt werden.
Programm: FUNCTION ggT(a, b:int64):int64;BEGIN IF b=0 THEN ggT:a ELSE ggT:=ggT(b, a mod b);END;
Erklärung: Zunächst legt man in der ersten Zeile die Beiden Parameter fest, die für die beiden Zahlen, deren größter gemeinsamer Teiler gesucht ist, stehen. Im eigentlichen Programmteil, also der Rekursion, wird zu Beginn abgefragt, ob der Parameter b den Wert „0“ hat. Ist dies der Fall so wird Parameter a als ggT der Zahlen a und b ausgegeben. Andernfalls bekommt der Parameter a den Wert des Parameters b zugewiesen und Parameter b den Wert des Divisionsrests von a durch b. Diese Vertauschung wird solange fortgeführt bis Parameter b den Wert „0“ beinhaltet und somit Parameter a ausgegeben werden kann. Diese Vorgehensweise ist eine Beschleunigung des Euklid’schen Algorith...
Das komplette Referat erhältst Du nach Eingabe Deiner E-Mail als kostenlosen Download.
Oder anmelden bzw. kostenlos registrieren.


