没有合适的资源?快使用搜索试试~ 我知道了~
第三讲递归与回溯法[参照].pdf
1.该资源内容由用户上传,如若侵权请联系客服进行举报
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
版权申诉
0 下载量 103 浏览量
2021-10-12
05:46:25
上传
评论
收藏 186KB PDF 举报
温馨提示
试读
15页
第三讲递归与回溯法[参照].pdf
资源推荐
资源详情
资源评论
1
,,
N!N!=N*(N-1)! N! (N-1)!
program Factorial;
var
N: Integer;
T: Longint;
function Fac(N: Integer): Longint;
begin
if N = 0 then Fac := 1 else Fac := N * Fac(N - 1)
end;
begin
Write('N = '); Readln(N);
T := Fac(N);
Writeln('N! = ',T);
end.
3-1 N=3
f g
f(n) f(n-1) f(n-1) f(n-2)
01
0)!1(*
!
n
nnn
n
3-1
0
01,
na
nnfng
nf
2
f(n)
f(0)=a
f(1)=g(1,a) f(2)=g(2,f(1)) , ,
f(n)=g(n,f(n-1))
2
12
01
21
nff
n
n
f
nn
n
function fib(n: Integer): Integer;
begin
if n = 0 then
fib := 1 { }
else if n = 1 then
fib := 2 { }
else
fib := fib(n 2) + fib(n 1); { }
end;
unction fib(n: Integer): Integer;
begin
P
P D D P
3
f[0] := 1; f[1] := 2; { }
for I := 2 to n do
f[I] := f[I 1] + f[I 2];
fib := f(n);
end;
N
1 N
N S(N)
S(N)=S(N-2)+S(N-1)
N
2 hanoi
n 1 n n
ABC
1 2~4 ABC
5~7 ABC
Move I form P to Q
6
3 1 2 3
2 4 5
1 6
0
6 1 2 3 4 5 6
0
3-2
3-2
剩余14页未读,继续阅读
资源评论
czq131452007
- 粉丝: 2
- 资源: 12万+
下载权益
C知道特权
VIP文章
课程特权
开通VIP
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功