1326. Window (Standard IO)

Description

　　给你一个长度为N的数组，一个长为K的滑动的窗体从最左移至最右端，你只能见到窗口的K个数，每次窗体向右移动一位，如下表：

　　

　　你的任务是找出窗口在各位置时的max value,min value

题解：

这一题最好用单调队列，但我不会，看来只有暴力了。

先把第一个区间最大和最小找到，然后记录位置，之后每个区间判读还在不在，不在就在找一次。

补课链接：http://baike.baidu.com/link?url=LdkPAqNNzzxaKpiZL_EFM-WD0261xxArSksYlNwWwTYks29iOijn_5t20nvCOoOgOS5UCOu9RtQcezuoMrLbgq

代码：

var

  a,b,c:array[1..1000000] of longint;

  n,m,l,r:longint;

function max(x,y:longint):longint;

var

  i:longint;

begin

  max:=a[x];l:=x;

  for i:=x+1 to y do

    if max<a[i] then

      begin

        max:=a[i];

        l:=i;

      end;

end;

function min(x,y:longint):longint;

var

  i:longint;

begin

  min:=a[x];r:=x;

  for i:=x+1 to y do

    if min>a[i] then

      begin

        min:=a[i];

        r:=i;

      end;

end;

var

  i:longint;

begin

  readln(n,m);

  for i:=1 to n do

    read(a[i]);

  b[1]:=max(1,m);

  c[1]:=min(1,m);

  for i:=2 to n-m+1 do

    begin

      if l<i then b[i]:=max(i,m+i-1)

        else

          if a[m+i-1]<b[i-1] then b[i]:=b[i-1] else b[i]:=a[m+i-1];

      if r<i then c[i]:=min(i,m+i-1)

        else

          if a[m+i-1]>c[i-1] then c[i]:=c[i-1] else c[i]:=a[m+i-1];

    end;

  for i:=1 to n-m+1 do

    write(c[i],' ');

  writeln;

  for i:=1 to n-m+1 do

    write(b[i],' ');

end.