UC知道一个简单的编程问题啊哈哈哈!!
来源：百度知道 编辑：UC知道 时间：2024/05/21 08:17:05
说明:假设有一张无限大的纸厚0.03mm,珠峰高约9800m,问:这张纸要折叠多少次才能达到珠峰的高度???
n=2:l=1
do until 0.03*n>9800000
n=n*2:l=l+1
loop
msgbox "0.03mm的纸要折叠" & l & "次时是" & 0.03*n/1000 & "m" _
& vbcrlf & "0.03mm的纸要折叠" & l-1 & "次时是" & 0.03*n/2000 & "m" ,4096,"计算结果"
'把以上内容复制到记事本另存为aa.vbs（保存类型—所有文件）
笨蛋要326666666次