Question

猴子吃桃问题 递归VB

帮忙编个程序 再说下思路......

用递归过程求解猴子吃桃问题。有一只猴子每天吃现有桃子的一半，再加1个桃子，到第9天吃完的时候，发现只剩下1个桃子了。请计算最初有几个桃子。
谢谢～

Answer 1

public
sub
dateadd()
dim
iday
as
integer
dim
isum
as
double
iday
=
25
isum
=
1
for
i
=
iday
to
1
step
-1
isum
=
isum
*
2
next
i
msgbox
isum
end
sub
33554432