注册 登录
编程论坛 Perl论坛

求解答一个perl基础运算的问题

perl_maggle 发布于 2022-08-28 10:33, 681 次点击
my $a= '4.4';
my $b='25';
my $c=$a*$b;
my $d=120-$c;
print($d);
结果为: 9.99999999999999 为什么不是 10?

$d=110-$c;
print($d);

结果为:-1.4210854715202e-14  为什么不是 0?

[此贴子已经被作者于2022-8-28 10:37编辑过]

1 回复
#2
fall_bernana2022-09-02 14:44
回复 楼主 perl_maggle
浮点十进制值通常没有完全相同的二进制表示形式。这是 CPU 所采用的浮点数据表示形式的副作用。为此,可能会经历一些精度丢失,并且一些浮点运算可能会产生意外的结果。
导致此行为的原因是下面之一:

  十进制数的二进制表示形式可能不精确。
  使用的数字之间类型不匹配(例如,混合使用浮点型和双精度型)。
PERL实际上把整数存在你的计算机中的浮点寄存器中,所以实际上被当作浮点数看待。在多数计算机中,浮点寄存器可以存贮约16位数字,长于此的被丢弃。整数实为浮点数的特例。
这个应该是数字计算时精度的问题导致的
1