dividieren verdammt langer Zahlen

[glkgereon]

ja dann sag halt

Delphi-Quellcode:

try
  for i:=1 to length(Zahl.zahl) do
  begin
    if Zahl.Zahl[i] mod zuDividieren <> 0  //wenns nicht aufgeht
    then Zahl.Zahl[i+1]:=Zahl.Zahl[i+1]+Zahl.zahl[i] mod zuDividieren; //dann wird der rest zur ziffer drunter dazugetan
    Zahl.Zahl[i]:=Zahl.Zahl[i] Div zuDividieren;
  end;
except
  Application.MessageBox('Zu großer Primfaktor','Es wurden Divisonsoperationen mit einer Zahl durchgeführt, dessen Primfaktoren zu groß sind');
end;

wenns dir so nicht gefällt nimm hagens unit...Mann!