Alles anzeigenHi,
kann es sein das Autoit falsch Rechnet bzw. irgendwie rundet?
Habe folgendes Script:
Spoiler anzeigen
[autoit]$m = 72
[/autoit] [autoit][/autoit] [autoit]
$c = $m^7
$c = Mod($c,187)MsgBox(0,"",$c)
[/autoit] [autoit][/autoit] [autoit]$m = $c^23
[/autoit] [autoit][/autoit] [autoit]
$m = Mod($m,187)MsgBox(0,"",$m)
[/autoit]
Bis zur Zeile "$m = Mod($m,187)" stimmt noch alles, aber hier gibt es statt 72 den Wert 34 aus.
AutoIt kann 30^23=9,4143178827e+33 (0xB708F35A37800000) intern (64-bit signed) nicht mehr richtig darstellen.
63 bits werden für die positiven Zahlen (0x7FFFFFFFFFFFFFFF) benötigt und das 64. bit für die negativen Zahlen!
Mod(9223372036854775807, 187) sollte noch gehen und Mod(9223372036854775808, 187) nicht mehr!
UEZ
da könnte dir diese udf helfen:
Leider auch für diese UDF zu große Zahlen zum berechnen.
Kennt jemand eine math.dll oder sowas in der Art?
Hi,
zur Multiplikation großer Zahlen bietet sich die bigint.udf hier aus dem Forum an, war irgendwann in grauer Vorzeit Ziel eines µIt.
Die Lösung für b^e mod m habe ich mal in eine Funktion gebracht:
$b=30
$e=23
$m=87
$mod=_multiplemodulo($b,$e,$m) ;b^e mod m
ConsoleWrite('@@ Debug(' & @ScriptLineNumber & ') : $mod = ' & $mod & @crlf & '>Error code: ' & @error & @crlf) ;### Debug Console
func _multiplemodulo($base,$exp,$mod) ;b^e mod m
$c=1
for $i=1 to $exp
$c=mod($c*$base,$mod)
next
return $c
endfunc
Was geht genau nicht?
Die Rechnung von Andy?
Bei mir kommt mit diesen Parametern 30 raus - das ist auch richtig.
Also was funktioniert bei dir nicht konkret?
ups, hatte fehler in der formel...ist jetzt berichtigt
#include <BigNum.au3>
$m = 72
$c = _BigNum_Pow($m, 7)
$c = _BigNum_Mod($c, 187)
MsgBox(0,"",$c)
[/autoit][autoit][/autoit][autoit]$m = _BigNum_Pow($c, 23)
$m = _BigNum_Mod($m, 187)
MsgBox(0, "" ,$m)
[/autoit]Gruß,
UEZ
