NOIP2004 合唱队形
时间限制: 1 Sec 内存限制: 128 MB
题目描述
N位同学站成一排,音乐老师要请其中的(N-K)位同学出列,使得剩下的K位同学排成合唱队形。
合唱队形是指这样的一种队形:设K位同学从左到右依次编号为1, 2, …, K,他们的身高分别为T1, T2, …, TK,则他们的身高满足T1 < T2 < … < Ti , Ti > Ti+1 > … > TK (1 <= i <= K)。
你的任务是,已知所有N位同学的身高,计算最少需要几位同学出列,可以使得剩下的同学排成合唱队形。
输入
第一行是一个整数N(2 <= N <= 100),表示同学的总数。第一行有n个整数,用空格分隔,第i个整数Ti(130 <= Ti <= 230)是第i位同学的身高(厘米)。
输出
包括一行,这一行只包含一个整数,就是最少需要几位同学出列。
样例输入
8
186 186 150 200 160 130 197 220
样例输出
4
提示
对于50%的数据,保证有n <= 20;
对于全部的数据,保证有n <= 100。
题解
枚举最高点,对前面的和后面的各做一次最长上升/下降序列
var
x,dp:array[0..5000]of longint;
n,i,j,k,ans,t1,t2:longint;
function max(a,b:longint):longint;
begin
if a>b
then exit(a)
else exit(b);
end;
begin
readln(n);
for i:=1 to n do
read(x[i]);
ans:=-1;
for i:=1 to n do
begin
for j:=1 to i do
dp[j]:=1;
for j:=1 to i do
for k:=j-1 downto 1 do
if x[j]>x[k]
then dp[j]:=max(dp[j],dp[k]+1);
t1:=-1;
for j:=1 to i do
t1:=max(t1,dp[j]);
for j:=i to n do
dp[j]:=1;
for j:=i to n do
for k:=j-1 downto i do
if x[j]<x[k]
then dp[j]:=max(dp[j],dp[k]+1);
t2:=-1;
for j:=i to n do
t2:=max(t2,dp[j]);
ans:=max(ans,t1+t2-1);
end;
writeln(n-ans);
end.