Ich habe bei einer Aufgabe meines Informatikkurses ein Problem. Wir sollen für Delphi (version 5) einen euklidischen Algorithmus programmieren. Als Beispiel gab es die Rechnung um den größten gemeinsamen Teiler einer Zahl zu ermitteln:

13629 = 1337 * 10 + 259
1337 = 259 * 5 + 42
259 = 42 * 6 + 7
42 = 7 * 6 + 0

zusätzliche Angabe für die erste Zeile der Rechung:
a = 13629
b = 1337
r = 259

Allgemeine Angaben noch zum Algorithmus, also was er beinhaltet:
a:=b;
b:=r;
until r=0;

Das Ganze soll laut unserer Lehrerin mit den Befehlen "mod" und "div" lösbar sein, nur habe ich keinerlei Idee wie man diese Rechnung in Delphi übertragen kann. Könnt ihr mir auf die Sprünge helfen?

Ein Programm ist eine E/A-Relation (Eingabe/Ausgabe). Also musst du erstmal die Eingabe definieren. Was wird vorgegeben? Und was soll rauskommen?

Schau mal dort !
(a-r/b)

Euklidischer Algorithmus
Euklidischer Algorithmus (Rekursiv)
Euklidischer Algorithmus (Erweitert)

Mit Erklärung, Code und Functionen.

delphi.zsg-rottenburg.de/stichwort.html

Vielen Dank