Español
Bugs y vermeintliche

Aktuelle Versión: XProfan X4

Rundung en Int

 

Jörg
Sellmeyer
Profanhilfe Int (N)
Ganzzahliger Anteil de N. Lo no es gerundet.

SubProc Get.Einer

    Parámetros Zahl&&
    declarar f!
    Var Divisor& = 10
    f! = (Zahl&& / Divisor& - Int(Zahl&& / Divisor&))
    Zahl&& = (Zahl&& / Divisor& - Int(Zahl&& / Divisor&)) * Divisor&
    Volver (f! * Divisor&)

ENDPROC

SubProc Get.Zehner

    Parámetros Zahl&&
    declarar f!
    Var Divisor& = 100
    f! = (Zahl&& / Divisor& - Int(Zahl&& / Divisor&))
    Zahl&& = (Zahl&& / Divisor& - Int(Zahl&& / Divisor&)) * Divisor&
    Volver (f! * Divisor&)

ENDPROC

Imprimir Int(Get("Einer",2020))
Imprimir "Warum kommt hier sólo 19 fuera?"
Imprimir Int(Get("Zehner",2020))
Imprimir
Imprimir Get("Einer",2020)
Imprimir "Als Floatausgabe correcto..."
Imprimir Get("Zehner",2020)
Imprimir "und con Round auch"
Imprimir Int(Round(Get("Zehner",2020),0))
WaitInput
 
Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...
24.05.2018  
 




RGH
¡Hola,

el liegt daran, dass no todos Ganzzahlen una exakte interne Bit-Entsprechung como Fließkommazahl haben.

(Es auch el Grund, por qué Vergleiche de Fließkommazahlen con Ganzzahlen gerne daneben ir y niemals verwandt voluntad debería.)

Diese Zeilen zeigen el problema:
CLS
Var Zahl& = 2020
Var Divisor& = 100
set("decimals",15)
imprimir "  ";Zahl& / Divisor&
set("decimals",6)
imprimir "  ";Zahl& / Divisor&
WaitInput
end

En Defaulteinstellung de 6 Nachkommastellen, fällt no así ligeramente en. Mit Round() lässt se el problema umgehen.

Yo habe largo en el Finanzbranche programmiert y como war el una stetige Falle, el a cada Ecke darauf wartete, dass uno hineinfällt. Das Problema hay auch en JAVA, Delphi oder C, como lo con el internen Darstellung de Fließkommazahlen des Prozessors a tun ha.
Einige Idiomas bieten para rundungsfehlerfreie Berechnungen por lo tanto BCD-Arithmetik a.

Saludo
Roland
 
Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4
24.05.2018  
 




Jörg
Sellmeyer
Gracias, el erklärt lo.

Hier  [...]  son unos pocos Möglichkeiten, en el sin Rundungsprobleme a lösen.
 
XProfan X3
Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...
24.05.2018  
 



Respuesta


Título del Tema, max. 100 Signo.
 

Systemprofile:

Kein Systemprofil creado. [anlegen]

XProfan:

 Contribución  Font  Smilies  ▼ 

Bitte registro en una Contribución a verfassen.
 

Tema opciones

3.049 Views

Untitledvor 0 min.
Stringray05.01.2022
RGH05.07.2020
Jörg Sellmeyer24.06.2020
Rolf Koch15.01.2020
Más...

Themeninformationen

Dieses Thema ha 2 subscriber:

Jörg Sellmeyer (2x)
RGH (1x)


Admins  |  AGB  |  Applications  |  Autores  |  Chat  |  Política de Privacidad  |  Descargar  |  Entrance  |  Ayuda  |  Merchantportal  |  Pie de imprenta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Juegos  |  Búsqueda  |  Support

Ein Projekt aller XProfan, el lo son!


Mi XProfan
Privado Noticias
Eigenes Ablageforum
Temas-Merkliste
Eigene Beiträge
Eigene Temas
Zwischenablage
Cancelar
 Deutsch English Français Español Italia
Traducciones

Política de Privacidad


Wir uso Cookies sólo como Session-Cookies wegen el technischen Notwendigkeit y en uns hay no Cookies de Drittanbietern.

Wenn du hier en unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung de Informationen en unseren Cookies en XProfan.Net a.

Weitere Informationen a unseren Cookies y dazu, como du el Kontrolle darüber behältst, findest du en unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Yo möchte no Cookie