4540: [Hnoi2016]序列

https://www.lydsy.com/JudgeOnline/problem.php?id=4540

分析:

  莫队+RMQ+单调栈。

  考虑加入一个点后,区间发生了什么变化。[l,r]->[l,r+1],增加了r-l+1段区间。设[l,r+1]的最小值在p,那么左端点在l~p-1的区间,答案就是a[p]了,p右边同样还存在许多最小值,影响了一段的区间。

  每个点影响的区间是这样的,p的贡献就是a[p]*(p-l+1),剩余的贡献,可以记录每个位置向左的前缀和,那么求出p+1~R+1的贡献就行了(L可能不是最小的点,不能直接算L~R+1,只能从p开始算,p剩余的部分,单独算了)。同样的向右的也是这样求出。用单调栈求出每个位置左边第一个比它大的L[i],然后sl[i] = sl[L[i]] + a[i] * (i - L[i])。快速求出最小的值得位置的过程可以用RMQ维护。

  于是就可以开心的用莫队了。

代码:

 #include<cstdio>
#include<algorithm>
#include<cstring>
#include<cmath>
#include<iostream>
#include<cctype>
#include<set>
#include<vector>
#include<queue>
#include<map>
#define fi(s) freopen(s,"r",stdin);
#define fo(s) freopen(s,"w",stdout);
using namespace std;
typedef long long LL; inline int read() {
int x=,f=;char ch=getchar();for(;!isdigit(ch);ch=getchar())if(ch=='-')f=-;
for(;isdigit(ch);ch=getchar())x=x*+ch-'';return x*f;
} const int N = ; int a[N], sk[N], bel[N], L[N], R[N], f[N][], Log[N];
LL ans[N], sl[N], sr[N], Answer;
struct Que{
int l, r, id;
bool operator < (const Que &A) const {
return bel[l] == bel[A.l] ? r < A.r : bel[l] < bel[A.l];
}
}q[N]; inline int Min(int i,int j) {
return a[i] < a[j] ? i : j;
}
inline int Calc(int l,int r) {
if (r < l) swap(l, r);
int t = Log[r - l + ];
return Min(f[l][t], f[r - ( << t) + ][t]);
}
inline void updl(int l,int r,int o) {
int p = Calc(l, r);
LL t = 1ll * a[p] * (r - p + ) + sr[l] - sr[p];
Answer += o * t;
}
inline void updr(int l,int r,int o) {
int p = Calc(l, r);
LL t = 1ll * a[p] * (p - l + ) + sl[r] - sl[p];
Answer += o * t;
}
int main() { fi("1.txt");
int n = read(), Q = read(), B = sqrt(n); Log[] = -;
for (int i=; i<=n; ++i) {
a[i] = read();
bel[i] = (i - ) / B + ;
Log[i] = Log[i >> ] + ;
f[i][] = i;
}
for (int i=; i<=Q; ++i)
q[i].l = read(), q[i].r = read(), q[i].id = i; for (int j=; j<=Log[n]; ++j)
for (int i=; i+(<<j)-<=n; ++i)
f[i][j] = Min(f[i][j - ], f[i + ( << (j - ))][j - ]); int top = ;
for (int i=; i<=n; ++i) {
while (top && a[sk[top]] >= a[i]) R[sk[top]] = i, top --;
sk[++top] = i;
}
while (top) R[sk[top]] = n + , top --;
for (int i=n; i>=; --i) {
while (top && a[sk[top]] > a[i]) L[sk[top]] = i, top --;
sk[++top] = i;
}
while (top) L[sk[top]] = , top --; for (int i=; i<=n; ++i) sl[i] = sl[L[i]] + 1ll * (i - L[i]) * a[i];
for (int i=n; i>=; --i) sr[i] = sr[R[i]] + 1ll * (R[i] - i) * a[i]; sort(q + , q + Q + );
int l = , r = ;
for (int i=; i<=Q; ++i) {
while (l > q[i].l) l --, updl(l, r, ); // 先加在减!!!
while (r < q[i].r) r ++, updr(l, r, );
while (l < q[i].l) updl(l, r, -), l ++;
while (r > q[i].r) updr(l, r, -), r --;
ans[q[i].id] = Answer;
}
for (int i=; i<=Q; ++i)
printf("%lld\n", ans[i]);
return ;
}

4540: [Hnoi2016]序列的更多相关文章

  1. BZOj 4540: [Hnoi2016]序列 [莫队 st表 预处理]

    4540: [Hnoi2016]序列 题意:询问区间所有子串的最小值的和 不强制在线当然上莫队啦 但是没想出来,因为不知道该维护当前区间的什么信息,维护前后缀最小值的话不好做 想到单调栈求一下,但是对 ...

  2. BZOJ.4540.[HNOI2016]序列(莫队/前缀和/线段树 单调栈 RMQ)

    BZOJ 洛谷 ST表的一二维顺序一定要改过来. 改了就rank1了哈哈哈哈.自带小常数没办法. \(Description\) 给定长为\(n\)的序列\(A_i\).\(q\)次询问,每次给定\( ...

  3. BZOJ 4540 [Hnoi2016]序列 | 莫队 详细题解

    传送门 BZOJ 4540 题解 --怎么说呢--本来想写线段树+矩阵乘法的-- --但是嘛--yali的机房太热了--困--写不出来-- 于是弃疗,写起了莫队.(但是我连莫队都想不出来!) 首先用单 ...

  4. bzoj 4540: [Hnoi2016]序列

    Description 给定长度为n的序列:a1,a2,-,an,记为a[1:n].类似地,a[l:r](1≤l≤r≤N)是指序列:al,al+1,-,ar- 1,ar.若1≤l≤s≤t≤r≤n,则称 ...

  5. bzoj 4540: [Hnoi2016]序列 莫队

    题目: 给定长度为n的序列:a1,a2,-,an,记为a[1:n].类似地,a[l:r](1≤l≤r≤N)是指序列:al,al+1,-,ar- 1,ar.若1≤l≤s≤t≤r≤n,则称a[s:t]是a ...

  6. BZOJ 4540 [Hnoi2016]序列 (单调栈 + ST表 + 莫队算法)

    题目链接  BZOJ4540 考虑莫队算法. 这题难在$[l, r]$到$[l, r+1]$的转移. 根据莫队算法的原理,这个时候答案应该加上 $cal(l, r+1) + cal(l+1, r+1) ...

  7. bzoj 4540: [Hnoi2016]序列【单调栈+线段树】

    强烈安利:http://blog.csdn.net/qq_34637390/article/details/51313126 这篇讲标记讲的非常好,这个标记非常神奇-- 首先last表示扫描到last ...

  8. [BZOJ4540][HNOI2016]序列 莫队

    4540: [Hnoi2016]序列 Time Limit: 20 Sec  Memory Limit: 512 MB Description 给定长度为n的序列:a1,a2,…,an,记为a[1:n ...

  9. [Bzoj4540][Hnoi2016] 序列(莫队 + ST表 + 单调队列)

    4540: [Hnoi2016]序列 Time Limit: 20 Sec  Memory Limit: 512 MBSubmit: 1567  Solved: 718[Submit][Status] ...

随机推荐

  1. 关于使用Filter降低Lucene tf idf打分计算的调研

    将query改成filter,lucene中有个QueryWrapperFilter性能比较差,所以基本上都须要自己写filter.包含TermFilter,ExactPhraseFilter,Con ...

  2. LayIM.AspNetCore Middleware 开发日记(二)预备知识介绍

    前言 开发一个AspNetCore的中间件需要理解RequestDelegate.另外,还需要理解.NET Core中的依赖注入.还有一个就是内嵌资源的访问.例如:EmbeddedFileProvid ...

  3. RedHat(小红帽)下 yum用不了的解决办法

    由于RedHat是商业版的,通常由于没有注册,导致yum程序无法使用(linux下面,yum是个安装软件的“神器”).此时可用CentOS的地址进行替换.下面将一步步说明如何处理: 一.删除RedHa ...

  4. Loadrunner上传文件与下载文件脚本

    Loadrunner上传文件与下载文件脚本 一. 上传脚本 Action() { int uploadImgStatus = 0; //获取上传产品图ID web_reg_save_param_ex( ...

  5. 404 Note Found 队-Alpha1

    目录 组员情况 组员1(组长):胡绪佩 组员2:胡青元 组员3:庄卉 组员4:家灿 组员5:凯琳 组员6:丹丹 组员7:家伟 组员8:政演 组员9:黄鸿杰 组员10:刘一好 组员11:何宇恒 展示组内 ...

  6. SQL SERVER或oracl如何判断删除列

    ORACLE: BEGIN  EXECUTE IMMEDIATE 'DROP TABLE CUX_PO_VENDORS';EXCEPTION  WHEN OTHERS THEN    NULL;END ...

  7. VB.NET &amp; Visual Basic

    当看到VB.NET者这本书籍的时候,翻开文件夹唯一的感受就是:这不和VB一样吗?究竟有什么差别呢? 1)版本号: 又一次回想VB,能够发现事实上他是Microsoft退出的基于Windows操作系统环 ...

  8. CoreAnimation|动画

    IOS开发UI篇--IOS动画(Core Animation)总结 - CSDN博客 iOS动画,绝对够分量! - 简书 iOS动画篇:UIView动画 - 简书 iOS动画开发之五--炫酷的粒子效果 ...

  9. #leetcode刷题之路27-移除元素

    给定一个数组 nums 和一个值 val,你需要原地移除所有数值等于 val 的元素,返回移除后数组的新长度.不要使用额外的数组空间,你必须在原地修改输入数组并在使用 O(1) 额外空间的条件下完成. ...

  10. Read a large file with python

    python读取大文件 较pythonic的方法,使用with结构 文件可以自动关闭 异常可以在with块内处理 with open(filename, 'rb') as f: for line in ...