Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/url/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Tcl 计算百分比增加时出现异常。如何进行?_Tcl_Percentage_Divide By Zero - Fatal编程技术网

Tcl 计算百分比增加时出现异常。如何进行?

Tcl 计算百分比增加时出现异常。如何进行?,tcl,percentage,divide-by-zero,Tcl,Percentage,Divide By Zero,我用下面的公式来计算增长的百分比 ( (final_amount - original_amount) / original_amount ) * 100 我原来的金额是零,最后的金额是,比如说,1000。我得到一个被零除的错误 如果我的最终金额也是0,会发生什么 我怎样才能找到增长的百分比呢 提前谢谢。很简单:你不能 您正在应用与此等式相反的公式: original + original * amount/100 = final 你的未知是多少。但是,当“原始”为0时,方程的左侧始终为0,

我用下面的公式来计算增长的百分比

( (final_amount - original_amount) / original_amount ) * 100
我原来的金额是零,最后的金额是,比如说,1000。我得到一个被零除的错误

如果我的最终金额也是0,会发生什么

我怎样才能找到增长的百分比呢


提前谢谢。

很简单:你不能

您正在应用与此等式相反的公式:

original + original * amount/100 = final
你的未知是多少。但是,当“原始”为0时,方程的左侧始终为0,并且无论数值是多少,都有0=最终值


编辑

如果希望从0增加到100,可以使用
If
语句:

if { $origina_amount == 0 } {
    set increase 100
} else {
    set increase [expr {($final_amount - $origina_amont) / $original_amount * 100}]
}

我可以把百分比增加到100吗?100分制的无穷大是100。使用
if
语句区分这两种情况。我正在编辑我的答案以添加一些代码。一行代码版本:
设置增加[expr{$original\u amount?($final\u amount-$original\u amount)/$original\u amount*100:100}]