Thread Runden *war Subtrahieren in Perl ... (55 answers)
Opened by Muffi at 2013-09-25 10:41

bianca
 2013-09-25 07:04
#170579 #170579
User since
2009-09-13
6977 Artikel
BenutzerIn

user image
Hab ich doch verlinkt.
Wenn man -0.05499999999999999334 kaufmännisch auf zwei Stellen rundet, muss -0.05 rauskommen und nicht -0.06.
Und aus 0.05499999999999999334 darf natürlich nicht 0.06 werden sondern es sind 0.05.
Code (perl): (dl )
1
2
3
4
5
6
7
8
#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
use Math::Round;
my $var = '0.05499999999999999334';
print nearest(.01, $var);
print round($var);

Quote
0.060

Verwendet man hingegen 0.0549 als Wert kommt 0.050 raus.
Was auch immer das für Rundungsregeln sind, ich kenne sie nicht und mit kaufmännischem Runden haben sie nicht mal entfernt zu tun.
10 print "Hallo"
20 goto 10

View full thread Runden *war Subtrahieren in Perl ...