unerklärlicher fehler bei nichtprimzahl-test

[Lindworm]

hi, ich habe den code aus chackotays beispiel für eine nicht-primzahl-prüfung verwendet und bekomme jetzt bei der benutzung einen für mich unerklärlichen fehler:

"[Fehler] Unit1.pas(63): E2015 Operator ist auf diesen Operandentyp nicht anwendbar
[Warnung] Unit1.pas(63): W1023 Vorzeichenbehaftete und -lose Typen werden verglichen - beide Operanden werden erweitert"

Zeile 63 und umgebende sehen so aus:

Code:

58 implementation
59 {$R *.dfm}

61 function IsNotPrime(const a, n: longint): boolean;
62 begin
63   Result := (Power(a, n-1) mod n) <> 1;
64 end;
65 procedure TForm1.createnewClick(Sender: TObject);

wenn mehr quelltext benötigt wird, kann ich gerne noch mehr rausrücken
vielen dank schonmal für eure bemühungen, bene