论坛 › 已解决问题区 › 未懂的算术题（无聊发现的）

lm959680 发表于 2009-5-20 12:42:00

未懂的算术题（无聊发现的）

本帖最后由 lm959680 于 2009-5-20 19:15 编辑

发现个公式
（1/2-1/3）+（1/3-1/4）+.....+(1/9-1/10)

自己算了下 是0.28
本人数学没学`~~不知道 没有一个一个的算是写了大概程序算的，不知道对不对`~

Local $var, $a, $b
Local $c = 1
for $a = 2 to 10
        $b = $a +1
        $var =(Round($c / $a, 2) - Round($c / $b, 2)) +$var
        $a += 1
Next
MsgBox(0, "", $var)

别人算的 0.45
原式=（1/2-1/3）+（1/3-1/4）+.....+(1/9-1/10)
=1/2-1/10
=9/20


大家看看 是否对了

大绯狼 发表于 2009-5-20 13:03:51

1/2-1/10等于多少？等于0.45？楼主的数学真有问题

nicen2 发表于 2009-5-20 13:47:44

Local $var, $a, $b
Local $c = 1
for $a = 2 to 9
      $b = $a +1
      $var =(Round($c / $a, 2) - Round($c / $b, 2)) +$var
      ;$a += 1
Next
MsgBox(0, "", $var)

lm959680 发表于 2009-5-20 14:21:00

本帖最后由 lm959680 于 2009-5-20 14:22 编辑

1/2-1/10等于多少？等于0.45？楼主的数学真有问题
大绯狼 发表于 2009-5-20 13:03 http://www.autoitx.com/images/common/back.gif


是别人不是我
（1/2-1/3）+（1/3-1/4）+.....+(1/9-1/10)
=1/2-1/10
=9/20

我也不明白为什么是这样写`~

那0.45 我是算9/20 的！OK

javarike 发表于 2009-5-20 16:37:47

哈哈.怎么有两个结果?

sensel 发表于 2009-5-20 16:56:30

人脑算是这样：
$iResult = 1/2 + 0 - 1/10 ; 中间都是减去再加上相同数字，作0处理

电脑算是这样：Local $iResult = 0
For $i = 2 To 9 ; 一步步来
        $iResult += 1 / $i - 1 / ($i + 1)
Next
MsgBox(0, "Result: ", '[' & $iResult & ']')人脑胜在逻辑思维，电脑胜在处理速度

lm959680 发表于 2009-5-20 19:11:57

人脑算是这样：
$iResult = 1/2 + 0 - 1/10 ; 中间都是减去再加上相同数字，作0处理

电脑算是这样：Local $iResult = 0
For $i = 2 To 9 ; 一步步来
        $iResult += 1 / $i - 1 / ($i + 1)
Next
MsgBox(0, "Re ...
sensel 发表于 2009-5-20 16:56 http://www.autoitx.com/images/common/back.gif


哈哈 你的是正确的 并且代码最简洁 我的 多加了一句 $a += 1 就错了 嘿嘿`~~

顽固不化 发表于 2009-5-20 20:19:51

1/2-1/10
=5/10-1/10
=4/10
=0.4

查看完整版本: 未懂的算术题（无聊发现的）