找回密码
 加入
搜索
查看: 3292|回复: 7

[网络通信] 把一张纸折叠51次 算算他有多高!(以解决)

  [复制链接]
发表于 2010-3-13 02:09:49 | 显示全部楼层 |阅读模式
本帖最后由 nmgwddj 于 2010-3-13 11:12 编辑

想象一下,你手里有一张足够大的白纸。现在,你的任务是,把它对折叠51次。那么,它有多高?

假设一张纸就是0.008CM

用最简单的AU3语言表现出来。我自己做了个。CPU占用100% 可惜不行!
 楼主| 发表于 2010-3-13 02:12:19 | 显示全部楼层
都知道是2个51次方 如果能简单的设置几个变量 从1算起。那就更好了
发表于 2010-3-13 02:16:04 | 显示全部楼层
0.008CM?太超薄了吧……
msgbox(0, 0, 0.008 * 2 ^ 51 & ' CM')
 楼主| 发表于 2010-3-13 02:19:17 | 显示全部楼层
我得意思是这样
脑袋瓜子不好使了 刚写出来 看来得睡觉了
$a = 1
$b = 1
While 1
        $c = $b * 2
        $b = $c
        $d = $a + 1
        $a = $d
        If $d = 51 Then
                ExitLoop
        Else
        EndIf
WEnd
MsgBox(0, '', $c)
发表于 2010-3-13 02:22:19 | 显示全部楼层
MsgBox(0, 0, 0.008 * 2 ^ 51 & ' CM')

Local $N = 0.008
For $i = 1 To 51
        $N *= 2
Next
MsgBox(0, 0, $N & ' CM')
发表于 2010-3-13 02:22:31 | 显示全部楼层
这个,被雷到了,你那个不就是在*2吗,afan那个靠谱
发表于 2010-3-13 02:26:51 | 显示全部楼层
呵呵~
发表于 2010-3-13 12:37:22 | 显示全部楼层
= =+ 你们好疯狂 答案已经都出来了
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-6-1 13:30 , Processed in 0.084276 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表