RSA	[modulo-Rechnen] [modulares Potenzieren] [Algorithmus von Euklid] [Euler-Funktion] [Satz von Euler] [modulares Inverses] [Primfaktorzerlegung] [Primzahlen finden] [Schlüsselpaar] [Angriff] [Sicherheit] Pfad: [Startseite] / [Fächer] / [Informatik] / [Kryptologie] / [RSA] / [Algorithmus von Euklid]
Hohenstaufen-Gymnasium Kaiserslautern	Autor: mk Letzte Änderung dieser Seite: 17.03.2007 12:41:00  76 Algorithmus von Euklid

Algorithmus von Euklid

  function ggt(a,b : int64) : int64;
  var
    r : int64;
  begin
    a := abs(a); b := abs(b);
    r := b;
    while r > 0 do
    begin
      r := a mod b;
      a := b;
      b := r;
    end;
    result := a;
  end;

euklid.zip

lokal