算法(五)递归算法——深度优先搜索
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
A、递归(DFS) 说白了还是循环，只是当3种循环不能做的时候的循环，我们用递归实现。
B、递归必须有终点，否则就会死递归，最后栈溢出202错误。
C、递归的实现，是按照层数优先搜索的方式实现的。到底返回上一层看看有没有其他的路可以继续下去。
D、函数function的递归必须有返回值。过程procedure到底就结束。
E、区分全局变量和局部变量的关系，全局一个子过程或函数里面动，全动，局部则互不影响，但会随着子过程或函数的消失而消失，子过程或函数的开始而开始。
F、四大法宝，剪枝（暗剪明剪）、迭代、回溯、*记忆化搜索。
在递归过程中，局部变量必须要赋初始值。
阶加普通for写法
var
n,i,s:longint;
begin
readln(n);
for i:=1 to n do
s:=s+i;
writeln(s);
end.
Procedure 递归写法
var
n,i,s:longint;
procedure try(x:integer);
begin
if x=n then
begin
s:=s+n;
exit;
end;
s:=s+x;
try(x+1);
end;
begin
readln(n);
try(1);
writeln(s);
end.
Function 递归写法
var
n:longint;
function try(x:integer):longint;
begin
if x=n then
exit(n);
exit(try(x+1)+x);
end;
begin
readln(n);
writeln(try(1));
end.
那些三位数
请你从小到大输出3位数，每一位的数字可以用1，2,3
111
112
113
。
。
。
333
那些四位数
请你从小到大输出4位数，每一位的数字可以用1，2,3，4
Oj1091
1091: 【提高】那些n位数
时间限制: 1 Sec 内存限制: 16 MB
提交: 1379 解决: 706
[提交][状态][讨论版]
题目描述
一个n位数，只由1，2，3，4...p这几个数字组成。请编写程序输出这些n位数，先小后大，每行一个。
输入
两个整数n，p(n＜9，p＜＝9，且p^n<=)
输出
若干行数
样例输入
4 6
样例输出
......
6352
6353
.....
提示
来源
n位数有重复的全排列
var
n,p:integer;
procedure dls(c,s:longint);
var
i:integer;
begin
if c=n+1 then
begin
writeln(s);
exit;
end;
for i:=1 to p do
dls(c+1,s*10+i);
end;
begin
readln(n,p);
dls(1,0);
end.
给出n位数字，和p，其中p个数字每一次只能用一次。要求所有的组合方案。一行一种样例输入没有重复数字的全组合
3 5 生成一个3位数有1到5这几个数字可以用
样例输出
123
124
125
134
135
234
235
245
345
var
n,p:integer;
procedure dls(c,s,qs:longint);
var
i:integer;
begin
if c=n+1 then
begin
writeln(s);
exit;
end;
for i:=qs+1 to p do
dls(c+1,s*10+i,i);
end;
begin
readln(n,p);
dls(1,0,0);
end.
告诉你要生成n位的数，有p个数字，每一个数字只能用一次要求全排列。样例输出
3 4 前者是n后者是p
样例输出
123
124
132
134
142
143
213
214
231
234
243
312
314
321
324
341
342
412
413
421
423
431
432
var
a:array[1..9] of boolean;