level 3
劳烦各位 帮忙看下 谢谢啦
题目是这样的:一个猴子吃桃,第一天摘下若干桃子,当即吃掉了一半,还不过瘾,又吃下一个,以后个天,天天如此,到第N天想在吃的时候,只剩下一个桃子了。要求编写程序通过Sub过程,在输入n天后能计算出猴子共摘多少桃子。
2012年06月03日 12点06分
1
level 3
您能具体的说下嘛 我的代码是这样的 Dim n, i As Single
i = 1
For i = n To 1 Step -1
i = (i + 1) * 2 Next i
lbl.Text = "桃子总共" & i & "个"
可是出来的总是0
2012年06月08日 22点06分
3
level 1
循环没执行,因为n没赋值
i=(i+1)*2 擦 为什么要改变循环变量
2012年06月09日 01点06分
4
level 12
Function aa(ByVal Day As Integer) As Integer
Dim n As Integer = 1
For i = 1 To Day
n = 2 * (n + 1)
Next
Return n
End Function
2012年06月09日 01点06分
5