作业帮 > 综合 > 作业

pascal 猴子吃枣问题

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/10/04 20:43:27
pascal 猴子吃枣问题
猴子吃枣问题.猴子摘了一堆枣,第一天吃了一半,还嫌不过瘾,又吃了一个;第二天又吃了剩下的一半零一个;以后每天如此.到第十天,猴子一看只剩下一个了.问最初有多少个枣子?
var
x,i :integer;
begin
x := 1;
for i := 2 to 10 do
x := (x+1)*2;
writeln( x );
readln;
end.