Primfaktorzerlegung läuft viel zu langsam...

[Chris P]

Probier mal:

Delphi-Quellcode:

var
   t, x, Count: Int64;