Forum: Sonstige Fragen zu Delphi
Delphi
by brushmate,
18. Mär 2009
So funktioniert jetzt...kann allerdings nur die 1 verschlüsseln :-D ansonsten kommt ein Overflow Fehler
Forum: Sonstige Fragen zu Delphi
Delphi
by brushmate,
18. Mär 2009
Das mit den ganzen Zahlen besteht ja auch weiterhin. durch das round wird der Wert für e ja ganzzahlig.
Ich speichere p*q in N und N ist Extended. Integerwerte kann man ja in Float Variablen speichern.
Forum: Sonstige Fragen zu Delphi
Delphi
by brushmate,
18. Mär 2009
In der Delphi-Hilfe steht, dass random ohne Paramater einen Wert 0 < x <= 1 zurückgibt (einen float-wert). Als Parameter kann nur Integer übergeben werden N ist aber Extended. Durch die Multiplikation kann der Zufallswert also höchstens N-1 werden
Forum: Sonstige Fragen zu Delphi
Delphi
by brushmate,
18. Mär 2009
Das habe ich jetzt mit round behoben funktioniert auch recht schnell...allerdings kommt dann in der nächsten repeat-Schleife wieder dasselbe Problem. round hilft dabei auch nicht
Ich hab mal mit einer for schleife alle werte ausprobiert die e annehmen könnte(aus dem von mir definierten Zahlenbereich) passen aber irgendwie alle nicht bei dem d*e mod phi = 1
Forum: Sonstige Fragen zu Delphi
Delphi
by brushmate,
18. Mär 2009
Soo hab den Fehler jetzt gefunden:
constructor TRSA.create();
var help: Integer;
begin
randomize;
repeat
help := random(46340);
until isPrime(help);
p := help;
Forum: Sonstige Fragen zu Delphi
Delphi
by brushmate,
18. Mär 2009
Wie schon gesagt glaube ich eigentlich nicht, dass es daran liegt, dass er zu lange braucht um die Primzahlen zu finden. ich kann das random(46340) auch auf random(3) setzen und der macht immer noch nix... Und aus 3 Zahlen 2 mögliche Primzahlen mit meiner Methode zu raten kann wohl nict sehr lange dauern
Forum: Sonstige Fragen zu Delphi
Delphi
by brushmate,
17. Mär 2009
onShow funktioniert auch nicht alo der erzeugt kein formular
Forum: Sonstige Fragen zu Delphi
Delphi
by brushmate,
17. Mär 2009
jep^^
die methode wie ich die primzahlen finde hat ohne den rest einwandfrei funktioniert und auch schnell..
ich hab jetzt mal den zahlen bereich aus dem der eine zahl raten soll auf 30 geändert und der erstellt trotzdem nicht die form
also liegts wohl eher nicht daran
Forum: Sonstige Fragen zu Delphi
Delphi
by brushmate,
17. Mär 2009
Hi,
ich versuch gerade die RSA-Verschlüsselung zu programmieren, bin jetzt auch eigentlich fertig damit, aber das Programm lässt sich nicht starten, bzw. hängt sich auf.
Es wird noch icht einmal das formular erstellt...
Könnt ihr mir sagen wodrann's liegt?