在 Perl 中处理美元计算的最佳技术是什么?
特别是:以下需要工作:
$balance = 10;
$payment = $balance / 3; # Each payment should be 3.33. How best to round amount?
$balance -= $payment * 3;
# assert: $balance == .01
一种常见的技术是在整数分,然后转换为美元和美分作为输出。因此,您的 10 美元余额将表示为 1000(美分),除以三得到 333,即 3.33 美元。
但是,如果您想将 10 美元的付款除以三,则需要某种方法来最终获得 3.33 美元、3.33 美元和 3.33 美元的付款。$3.34。这将更多地取决于您的应用程序逻辑和业务规则,而不是您的语言的算术功能。
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)