codves动态规划 最长上升子序列

熊大妈的奶牛在小沐沐的熏陶下开始研究信息题目。小沐沐先让奶牛研究了最长上升子序列，再让他们研究了最长公共子序列，现在又让他们要研究最长公共上升子序列了。
小沐沐说，对于两个串A，B，如果它们都包含一段位置不一定连续的数字，且数字是严格递增的，那么称这一段数字是两个串的公共上升子串，而所有的公共上升子串中最长的就是最长公共上升子串了。

奶牛半懂不懂，小沐沐要你来告诉奶牛什么是最长公共上升子串。不过，只要告诉奶牛它的长度就可以了。

分析：和题目说的一样，这就是一道最长上升子序列的模版题（LCIS算法）。

function max(a,b:longint):longint;


begin


  if a>b then exit(a) else exit(b);


end;






begin


  read(n);


  for i:=1 to n do read(a[i]);


  for j:=1 to n do read(b[j]);


  fillchar(f,sizeof(f),0);  


  for i:=1 to n do


    for j:=1 to n do


      if a[i]=b[j] then  


      begin


        for k:=0 to j-1 do  


          if (b[k]<b[j])and(f[i-1,k]>=f[i,j]) then f[i,j]:=f[i-1,k]+1;


      end


      else f[i,j]:=f[i-1,j];  


  ans:=0;


  for i:=1 to n do


    for j:=1 to n do


      if f[i,j]>ans then ans:=f[i,j];


  write(ans);


end.