洛谷 P1108 低价购买

题目描述

“低价购买”这条建议是在奶牛股票市场取得成功的一半规则。要想被认为是伟大的投资者，你必须遵循以下的问题建议:“低价购买；再低价购买”。每次你购买一支股票,你必须用低于你上次购买它的价格购买它。买的次数越多越好!你的目标是在遵循以上建议的前提下，求你最多能购买股票的次数。你将被给出一段时间内一支股票每天的出售价(2^16范围内的正整数)，你可以选择在哪些天购买这支股票。每次购买都必须遵循“低价购买；再低价购买”的原则。写一个程序计算最大购买次数。

这里是某支股票的价格清单：

日期 1 2 3 4 5 6 7 8 9 10 11 12

价格 68 69 54 64 68 64 70 67 78 62 98 87

最优秀的投资者可以购买最多4次股票，可行方案中的一种是：

日期 2 5 6 10

价格 69 68 64 62

输入输出格式

输入格式：
第1行: N (1 <= N <= 5000)，股票发行天数

第2行: N个数，是每天的股票价格。

输出格式：
输出文件仅一行包含两个数:最大购买次数和拥有最大购买次数的方案数(<=2^31)当二种方案“看起来一样”时（就是说它们构成的价格队列一样的时候）,这2种方案被认为是相同的。

输入输出样例

输入样例#1：
BUYLOW.IN
12
68 69 54 64 68 64 70 67 78 62 98 87
输出样例#1：
BUYLOW.OUT
4 2

分析：第一个答案很明显就是最长下降子序列，第二个答案为最长下降子序列的个数（相同不算，就是说，如果有两个长得一样的就只算一次）。我们可以这样想，如果有两个相同的子序列，它们在数列中的位置一定不同，而再后面的一定包括前面的，就是把后面的统计出来，然后标记，前面的就不会算多。

代码：

var
 f,a,d:array [1..5002] of longint;
 b:array [0..40000] of boolean;
 n,i,j,ans,max:longint;
begin
 readln(n);
 for i:=1 to n do
   read(a[i]);
 f[1]:=1; d[1]:=1;
 for i:=2 to n+1 do
 begin
  d[i]:=1;
  max:=0;
  for j:=i-1 downto 1 do
   if a[i]<a[j] then
    if f[j]>max then
    begin
     max:=f[j];
     fillchar(b,sizeof(b),true);
     b[a[j]]:=false; //标记当前最长子序列的最后一个数
     d[i]:=d[j];
    end
    else
     begin
      if (f[j]=max) and (b[a[j]]=true) then
       begin
        b[a[j]]:=false;
        d[i]:=d[i]+d[j]; //要加上所有不同的子序列，
             //例如：4 3 1 和 4 2 1两个的话，在前面  
             //判断3 2时已经加上了。                    
       end;
     end;
  f[i]:=max+1;
 end;
 writeln(f[n+1]-1,' ',d[n+1]);
end.