大佬教程收集整理的这篇文章主要介绍了当我在Perl中从自身中减去相同的浮点数时,为什么不能得到零?,大佬教程大佬觉得挺不错的,现在分享给大家,也给大家做个参考。
#!/usr/bin/perl $l1 = "0+0.590580+0.583742+0.579787+0.564928+0.504538+0.459805+0.433273+0.384211+0.3035810"; $l2 = "0+0.590580+0.583742+0.579788+0.564928+0.504538+0.459805+0.433272+0.384211+0.3035810"; $val1 = eval ($l1); $val2 = eval ($l2); $diff = (($val1 - $val2)/$val1)*100; print " (($val1 - $val2)/$val1)*100 ==> $diff\n";
令人惊讶的是,输出最终结果是
((4.404445 - 4.404445)/4.404445)*100 ==> -2.01655014354845e-14.
它不应该是一个零吗????
请任何人解释一下……
以上是大佬教程为你收集整理的当我在Perl中从自身中减去相同的浮点数时,为什么不能得到零?全部内容,希望文章能够帮你解决当我在Perl中从自身中减去相同的浮点数时,为什么不能得到零?所遇到的程序开发问题。
如果觉得大佬教程网站内容还不错,欢迎将大佬教程推荐给程序员好友。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。