Berechnungen des ggT's und kgV's auf verschiedene Weisen mit Hilfe von Pascal

Mit zwei Pascalprogramm, arithmetik.pas und berechnungggt.pas habe ich mir das Leben einfach gemacht und mir auch immer gleich eine Datei erstellen lassen, so daß ich nicht mehr viel Arbeit beim tippen habe. So lese ich z.B. eine Datei ein mit

In euklid.txt steht das Folgende drin:

euklid.txt
g 4 154 294 115 207

Als Ausgabe erhält man dann das folgende auf dem Bildschirm:

Kommandozeile
Berechnung des ggT und kgV auf verschiedene Arten ------------------------------------------------- Eingabe für ggT = g, Teilermengen = t, Primfaktorzerlegung = p und kgV = k ggT normal = 1 ggT schnell = 2 ggT prim = 3 ggT euklid = 4 ggT für drei Zahlen (normal) = 5 ggT für drei Zahlen (prim) = 6 ggT teilerfremd = 7

Dies leite ich mit

in eine Datei um.

Als LaTeX-Datei erhält man dann:

euklid.tex

Berechnung des ggT und kgV auf verschiedene Arten ------------------------------------------------- Eingabe für ggT = g, Teilermengen = t, Primzahlen p, Vielfachmengen = v und kgV = k ggT normal = 1 ggT schnell = 2 ggT prim = 3 ggT euklid = 4 ggT für drei Zahlen (normal) = 5 ggT für drei Zahlen (prim) = 6 ggT teilerfremd = 7 \begin{figure}[H] \centerline{ \xymatrix@R=3pt{ &&& \txt{Rechnung} \\ \txt{$\ggT(154;294)$} &\txt{$=$} &\txt{$\ggT(154;140)$}\ar@{->}[dll] &\txt{$294- 154=140$} \\ \txt{$\ggT(154;140)$} &\txt{$=$} &\txt{$\ggT(14;140)$}\ar@{->}[dll] &\txt{$154- 140=14$} \\ \txt{$\ggT(14;140)$} &\txt{$=$} &\txt{$\ggT(14;126)$}\ar@{->}[dll] &\txt{$140- 14=126$} \\ \txt{$\ggT(14;126)$} &\txt{$=$} &\txt{$\ggT(14;112)$}\ar@{->}[dll] &\txt{$126- 14=112$} \\ \txt{$\ggT(14;112)$} &\txt{$=$} &\txt{$\ggT(14;98)$}\ar@{->}[dll] &\txt{$112- 14=98$} \\ \txt{$\ggT(14;98)$} &\txt{$=$} &\txt{$\ggT(14;84)$}\ar@{->}[dll] &\txt{$98- 14=84$} \\ \txt{$\ggT(14;84)$} &\txt{$=$} &\txt{$\ggT(14;70)$}\ar@{->}[dll] &\txt{$84- 14=70$} \\ \txt{$\ggT(14;70)$} &\txt{$=$} &\txt{$\ggT(14;56)$}\ar@{->}[dll] &\txt{$70- 14=56$} \\ \txt{$\ggT(14;56)$} &\txt{$=$} &\txt{$\ggT(14;42)$}\ar@{->}[dll] &\txt{$56- 14=42$} \\ \txt{$\ggT(14;42)$} &\txt{$=$} &\txt{$\ggT(14;28)$}\ar@{->}[dll] &\txt{$42- 14=28$} \\ \txt{$\ggT(14;28)$} &\txt{$=$} &\txt{$\ggT(14;14)$}\ar@{->}[dll] &\txt{$28- 14=14$} \\ \txt{$\ggT(14;14)$} &\txt{$=$} & \txt{$14$} \\ }} \end{figure} \begin{figure}[H] \centerline{ \xymatrix@R=3pt{ &&& \txt{Rechnung} \\ \txt{$\ggT(115;207)$} &\txt{$=$} &\txt{$\ggT(115;92)$}\ar@{->}[dll] &\txt{$207- 115=92$} \\ \txt{$\ggT(115;92)$} &\txt{$=$} &\txt{$\ggT(23;92)$}\ar@{->}[dll] &\txt{$115- 92=23$} \\ \txt{$\ggT(23;92)$} &\txt{$=$} &\txt{$\ggT(23;69)$}\ar@{->}[dll] &\txt{$92- 23=69$} \\ \txt{$\ggT(23;69)$} &\txt{$=$} &\txt{$\ggT(23;46)$}\ar@{->}[dll] &\txt{$69- 23=46$} \\ \txt{$\ggT(23;46)$} &\txt{$=$} &\txt{$\ggT(23;23)$}\ar@{->}[dll] &\txt{$46- 23=23$} \\ \txt{$\ggT(23;23)$} &\txt{$=$} & \txt{$23$} \\ }} \end{figure}

Dies füge ich in eine .tex Datei ein. Wenn ich alles compiliert habe, ergibt sich das Folgende:

Letzte Änderung: 26.04.2012: 17:24:10 von X. Rendtel

Dieses Werk bzw. Inhalt steht unter einer Creative Commons Namensnennung-Weitergabe unter gleichen Bedingungen 3.0 Unported Lizenz.
Beruht auf einem Inhalt unter www.rendtel.de.