"Ungültige Gleitkommaoperation"

[TheAn00bis]

Folgende Berechnung ruft immer den Fehler "Ungültige Gleitkommaoperation" auf, allerdings nicht beim Umwandeln in die *.exe, sondern wenn ich im ausgeführten Programm den Button drücke, der die Funktion ausführt.

Delphi-Quellcode:

zahl:=trunc(power(zahl, e)) mod n;

Zahl und e sind Integer, der Integer scheint nicht überlaufen zu sein, da auch unter Verwendung von "LongInt" der Fehler angezeigt wird. Kann nur an dem geschriebenen Code liegen, da ohne ihn alles Funktioniert (nur zahl ist dann falsch ;))

edit: code war falsch, jetzt richtig/2: Klammer war flasch ://

[Muetze1]

Moin!

Integer und LongInt sind gleich gross, daher nutze mal Int64...

MfG
Muetze1

[TheAn00bis]

Danke, komisch das die das dann LONGint nennen...

Leider kein Unterschied. Aber da ist doch nichts falsch oder? Denn mod funktioniert nur mit Integern, power liefert extended, was aber durch trunc wieder zu integer wird -> müsste gehen. Oder?

EDIT: Es geht, wenn ich statt power die potenz ausschreibe also zahl*zahl*zahl...
Was läuft bei dem power/trunc denn falsch?

[Muetze1]

Moin!

Dir ist klar, das du Zahl^e rechnest und nicht e^Zahl? Weil wie willst du denn Zahl^e mit Zahl*Zahl hinbekommen?

MfG
Muetze1

[Binärbaum]

Zitat:

Zitat von Muetze1

Dir ist klar, das du Zahl^e rechnest und nicht e^Zahl? Weil wie willst du denn Zahl^e mit Zahl*Zahl hinbekommen?

Er hat doch gesagt, dass e ein Integer ist (also ist es nicht die eulersche Zahl( ca. 2.7182818... ))
Es ist ja klar, wie man Zahl^e dann hinbekommt, oder?

MfG
Binärbaum

[TheAn00bis]

Zahl sollte die Basis sein und e der Exponent, im Übrigen hab ich es auch mal umgedreht und der gleiche Fehler erscheint.

Ich kann doch statt zahl^e auch

Delphi-Quellcode:

for z:=0 TO e-2 do zahl:=zahl*zahl;

schreiben, oder nicht?

Edit: Nein, ist nicht die eulersche Zahl, ich versuche die RSA Entschlüßelung hinzubekommen...

[Binärbaum]

Zitat:

Zitat von TheAn00bis

Ich kann doch statt zahl^e auch

Delphi-Quellcode:

for z:=0 TO e-2 do zahl:=zahl*zahl;

schreiben, oder nicht?

Nein, so geht dass geht so nicht. Wenn schon, dann so:

Delphi-Quellcode:

var prod: Integer;
...
prod:= 1;
for z:=1 TO e do prod:= prod*zahl;
zahl:= prod;

//Edit: Schreibfehler

[TheAn00bis]

Danke, Binärbaum!

Ich denke ich weiß woran es liegt: power(10,77)=1E77 das kann er wahrscheinlich mit trunc nicht umrechnen. Wie rechne ich 1E77 denn in eine Dezimalzahl um?

[Binärbaum]

Zitat:

Zitat von TheAn00bis

Danke, Binärbaum!

Ich denke ich weiß woran es liegt: power(10,77)=1E77 das kann er wahrscheinlich mit trunc nicht umrechnen. Wie rechne ich 1E77 denn in eine Dezimalzahl um?

1E77 ist einfach eine 1 gefolgt von 77 Nullen. Das kann allerdings kein LongInt oder Int64 mehr darstellen (deshalb kommt wohl auch der Fehler), denn um diese Zahl zu speichern, bräuchte man 256 Bit, Int64 hat nur 64.
Deshalb musst du Double oder Extended verwenden. Die können solch große Zahlen noch darstellen.

MfG
Binärbaum

[TheAn00bis]

Danke und gibt es auch noch eine Möglichkeit mit Double oder Extended mod (modulo) zu verwenden? Muss ich mir die Funktion jetzt selber schreiben?

[Binärbaum]

Zitat:

Zitat von TheAn00bis

Danke und gibt es auch noch eine Möglichkeit mit Double oder Extended mod (modulo) zu verwenden? Muss ich mir die Funktion jetzt selber schreiben?

Modulo gibt es (ebenso wie den div-Operator) nur für ganzzahlige Typen (Byte, shortInt, LongInt, Cardinal,...). Modulo für Real-Typen wäre (wenn es sowas gäbe) aber nicht sinnvoll, da diese die Zahlen anders speichern als beispielsweise Integer. Bei Real-Typen ist die Genauigkeit nämlich begrenzt. Wenn ein Real-Typ z.B. auf 6 Stellen genau arbeitet, dann werden solche Zahlen wie 123.456.789.012 nur als 123.456.000.000 gespeichert. Die Zahl 123.456.789.999 würde ebenfalls als 123.456.000.000 gespeichert, obwohl es eine andere Zahl ist, da die Genauigkeit des Real-Typs nicht mehr Stellen hergibt. Das hätte zur Folge, dass beide Zahlen trotz ihrer Ungleichheit das selbe Ergebnis liefern, wenn man Modulo auf sie anwendet. Und das ist ja wohl nicht erwünscht.
Also gibt es nur zwei Möglichkeiten: entweder du bleibst mit den Potenzen im Bereich von Int64, oder du nimmst Double (bzw. Extended) für größere Zahlen und musst dich dann damit zufrieden geben, dass es in diesem Bereich kein Modulo mehr gibt.
Die dritte und aufwendigste Methode wäre, sich einen eigenen Ganzzahl-Datentyp zu basteln. Für den müsste man dann aber auch alle Rechenoperationen neu programmieren.

MfG
Binärbaum