AW: FMod "streikt"
Ich hätte dazu auch noch ne Frage:
Wie bekommt man denn eine 150-stellige Zahl überhaupt hin ? Extended sollte doch sofort auf 18-20 Stellen kürzen, oder bleibt 1.2E150 etwa so bestehen ?
Delphi-Quellcode:
Ich benutze solche Extremen normalweise nicht, bin aber auch etwas schockiert das es nur "teilweise" funktioniert.
LExt := 1.2E-150;
LExt := LExt + 0.1E-150; // Das geht tatsächlich LExt := Sin(LExt); // Das aber wohl nicht LExt := 1.2E-150; LExt := LExt + 0.1E-149; // Das geht tatsächlich LExt := 1.2E150; LExt := LExt + 0.1E150; // Das geht tatsächlich LExt := Sin(LExt); // Das wohl auch nicht Anscheinend kann man mit Mantisse/Exponent rechnen, aber mit keine Funktion. Da hoffe ich mal das ich sowas nie brauchen werde. Rollo |
AW: FMod "streikt"
Zitat:
Das Stichwort heißt "signifikante Dezimalstellen" Eine Fließkommazahl besteht aus dem Vorzeichen (+ oder -), der Mantisse und dem Exponent. Die Mantisse ist der Teil, in welchem die 18-20 "signifikanten" Dezimalstellen stecken und mit dem Exponent kann man ihn hin und her schieben, also bei Extended um fast 5000 Dezimalstellen vor oder hinter das Komma. (bei Double etwa 300 Dezimalstellen) 3,4xxxxxxxxxxxxxxxxx * 10^-4932 bis 1,1xxxxxxxxxxxxxxxxxx * 10^4932 3,4xxxxxxxxxxxxxxxxx / 10^4932 bis 1,1xxxxxxxxxxxxxxxxxx * 10^4932 das im Positiven und nochmal im degativen Bereich, zuzüglich der 0 und den Sonterwerten NAN, Infinity und NegInfinity. https://www.h-schmidt.net/FloatConverter/IEEE754de.html https://de.wikipedia.org/wiki/Mantisse |
AW: FMod "streikt"
Zur Frage wie man 150 Stellen überhaupt hinbekommt: Man muss sich mit eigenen Typen behelfen. Hier mal ein Beispiel:
http://www.delphiforfun.org/Programs...g_integers.htm Sherlock |
AW: FMod "streikt"
Zitat:
Bei Fließkomma-Zahlen (double) hat man sowas wie m*10^e, wobei im wesentlichen m eine Ganzzahl zwischen 0 und ca 10^16 ist. Hier hat ein double also ca 16 (signifikante "Stellen"). Bei Fließkomma-Rechnungen wird immer auf diese 16 Stellen gerundet und das hat manchmal komische Konsequenzen, zB wird 2E16 + 1 = 20000000000000000 + 1 = 20000000000000001 zu 20000000000000000 gerundet, d.h. Du kannst beliebig oft 1 zu 2E16 addieren ohne das sich der Double-Wert ändert. Daß sin(1e150) nicht funktioniert, ist ein Delphi-Bug (EMBA wird sagen 'Feature'). |
AW: FMod "streikt"
Ja ich bin von signifikanten Stellen ausgegangen. Das sin (e150) nicht funktioniert finde ich schon erschreckend. Ich hatte mit dem erstbesten online js Rechner getestet und der konnte etwas sinnvolles zurückgeben.
Das heisst für mich erstmal Achtung bei fliesskomma Rechnungen. Mit Rundungsfehlern hätte ich gerechnet aber solche logikfehler eher nicht. |
AW: FMod "streikt"
Hallo Leute,
die Ursache für die Entstehung des Problems war das März-Preisrätsel 2017 in Bild der Wissenschaft. Dabei hat mich nicht die "Lösung des Problems" interessiert, sondern wie das Endergebnis ausschaut und ob bei jeder diversen Losziehung das gleiche Ergebnis herauskommt. Die Berechnung war kein Problem, Double genügt, aber das gesamte Ergebnis als String darzustellen war mir unmöglich. Als FMode bei e^21 ausstieg war ich schon sehr erstaunt (nicht einmal Single wird überschritten!), zumal in der Hilfe doch die Funktion mit Extended-Werten umgehen sollte können. So wollte ich das machen: function ExtToString(source:Extended): string; const CharDigits = '0123456789'; var Rest:integer; begin Result := ''; repeat Rest:= Round(FMod(Source, 10))+1; Result := CharDigits[Rest] + Result; ASource := Int(Source / 10); until (Source = 0); end; Nach euren Hinweisen habe ich die Unit UBigIntsV5 von Gary Darby verwendet und es klappt hervorragend. Nochmals herzlichen Dank an alle! |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:44 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz