问题 D: 合唱队形

题目描述

N位同学站成一排,音乐老师要请其中的(N-K)位同学出列,使得剩下的K位同学排成合唱队形。
  合唱队形是指这样的一种队形:设K位同学从左到右依次编号为1, 2, …, K,他们的身高分别为T1, T2, …, TK,则他们的身高满足T1 < T2 < … < Ti , Ti > Ti+1 > … > TK (1≤i≤K)。
  你的任务是,已知所有N位同学的身高,计算最少需要几位同学出列,可以使得剩下的同学排成合唱队形。

输入

输入文件chorus.in的第一行是一个整数N(2 ≤ N ≤ 100),表示同学的总数。第二行有n个整数,用空格分隔,第i个整数Ti(130 ≤ Ti ≤ 230)是第i位同学的身高(厘米)。

对于50%的数据,保证有n ≤ 20;对于全部的数据,保证有n≤100。

输出

输出文件chorus.out包括一行,这一行只包含一个整数,就是最少需要几位同学出列。

样例输入

8 186 186 150 200 160 130 197 220

样例输出

4
program Chorus; const maxn=200;
type data=array[1..maxn] of longint;
var a,b,c:data;
    i,j,n,m:longint;

procedure up(x:longint);
var i,max:longint;

begin
  max:=0;
  for i:=x-1 downto 1 do
    if a[i]<a[x] then
      if b[i]>max then max:=b[i];
  b[x]:=max+1;
end;
procedure down(x:longint);
var i,max:longint;

begin   
  max:=0;
  for i:=x+1 to n do
    if a[i]<a[x] then
      if c[i]>max then max:=c[i];
  c[x]:=max+1;
end;

begin
  readln(n);
  for i:=1 to n do read(a[i]);
  for i:=1 to n do up(i);
  for i:=n downto 1 do down(i);
  m:=0;
  for i:=1 to n do begin
    b[i]:=b[i]+c[i];
    if b[i]>m then m:=b[i];
  end;
  writeln(n-m+1);
end.
阅读更多
版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/jing1223639316/article/details/46826689
个人分类: 编程
上一篇问题 C: 求最长上升序列
下一篇高精度加法
想对作者说点什么? 我来说一句

没有更多推荐了,返回首页

关闭
关闭