搜索与回溯 5.6

题目叙述：
设有A,B,C,D,E 5人从事j1,j2,j3,j4,j5 5项工作每人只能从事一项,它们的效益表如下:　
j1 j2 j3 j4 j5
A 13 11 10 4 7
B 13 10 10 8 5
C 5 9 7 7 4
D 15 12 10 11 5
E 10 11 8 8 4
求最佳安排,使效益最高。

---

这是一道水题

此题先将数组f都设为false（没做）。

然后搜索里判断是否已经做完，如做完就将此次的效率取大值，再将没人做的任务存放起来。

然后因为此题只有5个任务，所以直接for i:=1 to 5判断每一种情况，如果if f[i]=true就是这个任务已经有人做了，就不用判断。如果这个任务没人做过，就进行下一次的搜索。

最后再将每人做什么任务，和最终的效率求出来即可。

代码如下：

const a:array[1..5,1..5]of longint=((13,11,10,4,7),(13,10,10,8,5),(5,9,7,7,4),(15,12,10,11,5),(10,11,8,8,4));var maxl,y:array[1..5]of longint;    f:array[1..5]of boolean;    ans,i:longint;procedure dfs(l,x:longint);var  i:longint;begin  if l>5 then    begin      if x>ans then begin ans:=x; maxl:=y; end;      exit;    end;  for i:=1 to 5 do    if f[i]=false then      begin        y[l]:=i;        f[i]:=true;        dfs(l+1,x+a[l,i]);        f[i]:=false;      end;end;begin  fillchar(f,sizeof(f),false);  dfs(1,0);  for i:=1 to 5 do write(chr(i+64),': J',maxl[i],' ');  writeln;  write(ans);end.