Den MOD per Hand berechnen! -> falsches Ergebnis!!!!

[Corpsman]

Ich habs nu nicht ganz Geblickt,

aber ich Poste euch mal wie ich das mache.

Delphi-Quellcode:

Function XHochYModZ(x, y, z: integer): Integer;
Var
  i, e: INteger;
Begin
  e := 1;
  For i := 1 To y Do
    e := (e * x) Mod z;
  result := e;
End;

Ich hoffe das hilft.