洛谷 P1020 导弹拦截

题目描述

某国为了防御敌国的导弹袭击,发展出一种导弹拦截系统。但是这种导弹拦截系统有一个缺陷:虽然它的第一发炮弹能够到达任意的高度,但是以后每一发炮弹都不能高于前一发的高度。某天,雷达捕捉到敌国的导弹来袭。由于该系统还在试用阶段,所以只有一套系统,因此有可能不能拦截所有的导弹。

输入导弹依次飞来的高度(雷达给出的高度数据是不大于30000的正整数),计算这套系统最多能拦截多少导弹,如果要拦截所有导弹最少要配备多少套这种导弹拦截系统。

输入输出格式

输入格式:
一行,若干个正整数最多100个。

输出格式:
2行,每行一个整数,第一个数字表示这套系统最多能拦截多少导弹,第二个数字表示如果要拦截所有导弹最少要配备多少套这种导弹拦截系统。

输入输出样例

输入样例#1:
389 207 155 300 299 170 158 65
输出样例#1:
6
2

分析:
第一问是求最长下降子序列。
第二问就很奇怪了。其实有这样一个定理。就是最长下降链的数量=最长不下降子序列长,也就是最少要配备多少套这种导弹拦截系统=该序列的最长不下降子序列。

代码:

var
 a:array [0..102] of longint;
 f:array [0..102] of longint;
 i,j,n,ans:longint;
begin
 while not eoln do
  begin
   inc(n);
   read(a[n]);
  end;
 a[0]:=maxlongint;
 for i:=1 to n do
  for j:=0 to i-1 do
  begin
   if (a[i]<=a[j]) and (f[i]1) then{最长下降子序列}
    f[i]:=f[j]+1;
   if f[i]>ans then ans:=f[i];
  end;
 writeln(ans);
 fillchar(f,sizeof(f),0);
 ans:=0; a[0]:=0;
 for i:=1 to n do
  for j:=0 to i-1 do
   begin
    if (a[i]>a[j]) and (f[i]1) then {最长不下降子序列}
     f[i]:=f[j]+1;
    if f[i]>ans then ans:=f[i];
   end;
 writeln(ans);
end.

你可能感兴趣的:(DP)