|
identification division.
program-id. flo.
author. "Patrick Cousot".
date-written. 10.3.2006.
date-compiled.
data division.
working-storage section.
01 pic X.
88 xfalse value 0.
88 xtrue value 1.
77 x pic 9(8)V4 comp-5.
77 y pic 9(4)V2 comp-5.
77 z pic 9(4)V2 comp-5.
77 r pic 9(4)V2 comp-5.
procedure division.
compute x = 1.000000019e+38
compute y = x + 1.0e21
compute z = x - 1.0e21
compute r = y - z
display r
* gcc float-error.c
* ./a.out
* 0.000000
end-program flo.
¤ Dauer der Verarbeitung: 0.15 Sekunden
(vorverarbeitet)
¤
|
Haftungshinweis
Die Informationen auf dieser Webseite wurden
nach bestem Wissen sorgfältig zusammengestellt. Es wird jedoch weder Vollständigkeit, noch Richtigkeit,
noch Qualität der bereit gestellten Informationen zugesichert.
Bemerkung:
Die farbliche Syntaxdarstellung ist noch experimentell.
|
