【NOIP2016提高A组五校联考1】道路规划

最新推荐文章于 2019-07-03 20:14:35 发布

Marcus0_O

最新推荐文章于 2019-07-03 20:14:35 发布

阅读量479

点赞数

CC 4.0 BY-SA版权

分类专栏：线段树文章标签：线段树 dp

本文链接：https://blog.youkuaiyun.com/Fate_Zero_Saber/article/details/52735666

线段树专栏收录该内容

8 篇文章

订阅专栏

本文介绍了一道算法题目，通过线段树优化实现高效求解。文章首先提出70分解决方案，随后升级到100分完整解法，并分享了比赛时的想法及细节优化。文中附带Pascal代码实现。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

题目

Description
这里写图片描述
Input

Sample Input

5
1 4 5 2 3
3 4 2 1 5

Output
这里写图片描述
Sample Output

Data Constraint
这里写图片描述
Hint

比赛时の想法

一开始想到了70分的，然后很快发现线段树的优化，结果一个细节挂掉QAQ

正解

首先70分的话就是一个f[i]表示上面的位置最后一个为i的时候可以选的最大的集合，显然在下面的值相同的那个点一定是在最右边的，那么直接 $n^2$ 即可
然后100分的话就是拿线段树，那么就可以用log的时间来求出每一个f[i]的值

贴代码

var
    tree:array[0..500005]of longint;
    a,b:array[0..100005]of longint;
    i,j,k,l,n,x,y,ans,xx,xxx:longint;
function max(x,y:longint):longint;
begin
    if x>y then exit(x) else exit(y);
end;
procedure change(v,l,r,x:longint);
var
    mid:longint;
begin
    if l=r then tree[v]:=y else
    begin
        mid:=(l+r) div 2;
        if x<=mid then change(v*2,l,mid,x) else change(v*2+1,mid+1,r,x);
        tree[v]:=max(tree[v*2],tree[v*2+1]);
    end;
end;
procedure find(v,l,r,x,y:longint);
var
    mid:longint;
begin
    if (l=x) and (r=y) then xx:=max(xx,tree[v]) else
    begin
        mid:=(l+r) div 2;
        if x>mid then find(v*2+1,mid+1,r,x,y) else
        if y<=mid then find(v*2,l,mid,x,y) else
        begin
            find(v*2,l,mid,x,mid);
            find(v*2+1,mid+1,r,mid+1,y);
        end;
    end;
end;
begin
    assign(input,'t2.in'); reset(input);
    readln(n);
    for i:=1 to n do read(a[i]);
    readln;
    for i:=1 to n do
    begin
        read(x);
        b[x]:=i;
    end;
    for i:=1 to n do
    begin
        xx:=0;
        find(1,1,n,b[a[i]],n);
        y:=xx+1;
        if y>ans then ans:=y;
        change(1,1,n,b[a[i]]);
    end;
    writeln(ans);
    close(input);
end.