摘要:
//非递归搜索回溯框架dep:=1;//搜索起点,深度为1repeat while g[dep]n) then break;//不符条件 b[g[dep]]:=1;//记录之间结果 if dep=r then print //终点 else inc(dep); //进 end; b[g[dep]]:=0;//回溯 g[dep]:=0; dec(dep); until dep=0;//回溯到起点之前时结束搜索 writeln(s);end.var n,i,t,m:integer; g:array[0..100]of integer; b:set of 0..100;... 阅读全文