POJ 2777

POJ 2777

题目大意：有len个区间，每次为[x,y]区间上色,然后有询问操作，问[x,y]区间上有多少种颜色。

解：线段树维护，1wa是因为没看见x可以大于y并作出相应处理然后2wa3wa就是细节问题了，大体是l，r和s，e混淆。然后tle，是因为lazy写错了，正解应该是如果包含则直接改值，当以后如果在改的区间内，这个区间只有一个颜色的话，记得把原来的颜色递归给儿子，把c置0再递归处理（因为区间的划分决定了你目前所在的区间一定包含我们要涂改的区间的子区间，如果这个区间只有一个颜色那么新的子区间的插入就会改变这个情况，所以lazy标记置0，并一定要把原来的颜色递归下去！不然对这些子区间的询问会出错。

//poj 2777
const
        maxl=101111;
        maxt=31;
        inf='1.txt';
type
        data=record
          mid, l, r, st, ed, c: longint;
        end;
var
        tree: array[0..maxl*4]of data;
        col: array[0..maxt]of boolean;
        ans, len, t, o: longint;
procedure build(const s, e, k, color: longint);
begin
  with tree[k] do begin
    st := s; ed := e; c := color;
    mid := (st+ed)>>1;
    if s=e then exit;
    l := k << 1; build(s, mid, l, color);
    r := l + 1; build(mid+1, e, r, color);
  end;
end;

procedure init;
begin
  readln(len, t, o);
  build(1, len, 1, 1);
end;

procedure cover(const s, e, k, color: longint);
begin
  with tree[k] do begin
    if (s<=st)and(ed<=e) then begin
      c := color; exit;
    end;
    if c>0 then begin
      tree[l].c := c; tree[r].c := c;
      c := 0; //!!!
    end;
    if s<=mid then cover(s, e, l, color);
    if e>mid then cover(s, e, r, color);
  end;
end;

procedure count(const s, e, k: longint);
begin
  with tree[k] do begin
    if c>0 then begin
      col[c] := true; exit;
    end;
    if s<=mid then count(s, e, l);
    if e>mid then count(s, e, r);
  end;
end;

procedure main;
var
        i, j, x, y, z: longint;
        c: char;
begin
  for i := 1 to o do begin
    read(c);
    if c='C' then begin
      readln(x, y, z);
      if x>y then begin
        j := x; x := y; y := j;
      end;
      cover(x, y, 1, z);
    end
    else begin
      fillchar(col, sizeof(col), 0);
      readln(x, y);
      if x>y then begin
        j := x; x := y; y := j;
      end;
      count(x, y, 1);
      ans := 0;
      for j := 1 to t do
        if col[j] then inc(ans);
      writeln(ans);
    end;
  end;
end;

begin
  assign(input,inf); reset(input);
  init;
  main;
end.