\(des\)

存在一个长度为 \(n\) 的数字 \(s\), 一个素数 \(P\)

\(m\) 次询问一段区间 \([l, r]\) 内的子串构成的数是 \(P\) 的倍数

\(sol\)

对于一次询问 \([l, r]\)

答案为

\[\sum_{i=l}^{r} \sum_{j=i}^{r}[(\sum_{k=i}^{j} s_{k} \times 10^{j-k}) \pmod P \equiv 0]
\]

等价于

\[\sum_{i=l}^{r} \sum_{j=i}^{r} [10^{j} (\sum_{k=i}^{j} s_{k} \times 10^{-k}) \pmod P \equiv 0]
\]

当 \(P \ne 2 且 P \ne 5\) 时,\(p \nmid 10^j\)

所以原式等价于

\[\sum_{i=l}^{r} \sum_{j=i}^{r} [(\sum_{k=i}^{j} s_{k} \times 10^{-k}) \pmod P \equiv 0]
\]



\(a_k = s_k \times 10^{-k} \pmod P\)

\(sum_k = \sum_{i=1}^{k} a_i \pmod P\)

所以原式等价于

\[\begin{split}
& \sum_{i=l}^{r} \sum_{j=i}^{r} [(\sum_{k=i}^{j} a_k) \pmod P \equiv 0] \\
= &\sum_{i=l}^{r} \sum_{j=i}^{r} [(sum_j = sum_{i-1})]
\end{split}
\]

对 \(sum\) 离散化后转化为区间查询相等的数的个数

莫队

对于 \(P = 2 或 P = 5\) 的情况特判即可

时间复杂度 \(O(n^{1.5} + nlogn)\)

#include <bits/stdc++.h>

using namespace std;
const int N = 1e5 + 10; #define Rep(i, a, b) for(int i = a; i <= b; i ++)
#define LL long long #define gc getchar()
inline int read() {
int x = 0; char c = gc;
while(c < '0' || c > '9') c = gc;
while(c >= '0' && c <= '9') x = x * 10 + c - '0', c = gc;
return x;
} int P, n, m;
char s[N];
int pos[N], block;
struct Node {
int l, r, id;
bool operator < (const Node a) const {
if(pos[this-> l] == pos[a.l]) return pos[this-> r] < pos[a.r];
return pos[this-> l] < pos[a.l];
}
} Ask[N]; LL S[N], A[N], Sum[N], Ten[N] = {0, 10};
LL Copysum[N];
LL Tong[N], Answer[N]; LL Ksm(LL a, LL b) {
LL ret = 1;
while(b) {
if(b & 1) ret = ret * a % P;
a = a * a % P;
b >>= 1;
}
return ret;
} LL Now_ans; inline void Cut(int x) {Tong[Sum[x]] --; Now_ans -= Tong[Sum[x]];}
inline void Add(int x) {Now_ans += Tong[Sum[x]]; Tong[Sum[x]] ++;} void MoDui() {
int L = Ask[1].l, R = L - 1;
Rep(i, 1, m) {
int l = Ask[i].l - 1, r = Ask[i].r;
for(; L < l; L ++) Cut(L);
for(; R > r; R --) Cut(R);
for(; L > l; L --) Add(L - 1);
for(; R < r; R ++) Add(R + 1);
Answer[Ask[i].id] = Now_ans;
}
} LL totsum[N], totcnt[N]; void Special_Judge() {
Rep(i, 1, n) {
totcnt[i] = totcnt[i - 1] + ((s[i] - '0') % P == 0 ? 1 : 0);
totsum[i] = totsum[i - 1] + ((s[i] - '0') % P == 0 ? i : 0);
}
Rep(i, 1, m) {
int l = Ask[i].l, r = Ask[i].r;
cout << totsum[r] - totsum[l - 1] - (l - 1) * (totcnt[r] - totcnt[l - 1]) << "\n";
}
} int main() {
P = read();
scanf("%s",s + 1);
n = strlen(s + 1);
m = read();
Rep(i, 1, m) Ask[i] = (Node) {read(), read(), i};
if(P == 2 || P == 5) {
Special_Judge(); return 0;
}
block = sqrt(n);
Rep(i, 1, n) pos[i] = (i - 1) / block + 1;
sort(Ask + 1, Ask + m + 1);
Rep(i, 1, n) S[i] = (s[i] - '0') % P;
Rep(i, 2, n) Ten[i] = (Ten[i - 1] * 10) % P;
Rep(i, 1, n) A[i] = S[i] * Ksm(Ten[i], P - 2) % P;
Rep(i, 1, n) Sum[i] = (Sum[i - 1] + A[i]) % P;
Rep(i, 1, n) Copysum[i] = Sum[i];
sort(Copysum + 1, Copysum + n + 1);
Rep(i, 1, n) Sum[i] = lower_bound(Copysum, Copysum + n + 1, Sum[i]) - Copysum;
MoDui();
Rep(i, 1, m) cout << Answer[i] << "\n";
return 0;
}

loj #2053 莫队的更多相关文章

  1. LOJ.6504.[雅礼集训2018 Day5]Convex(回滚莫队)

    LOJ 莫队.发现只需要维护前驱后继就可以了. 但是加入一个点需要找到它当前的前驱后继,很麻烦还带个\(\log\). 但是如果只有删除某个点,只需要更新一下它的前驱后继即可. 用回滚莫队就好惹. 撤 ...

  2. LOJ#6504. 「雅礼集训 2018 Day5」Convex(回滚莫队)

    题面 传送门 题解 因为并不强制在线,我们可以考虑莫队 然而莫队的时候有个问题,删除很简单,除去它和前驱后继的贡献即可.但是插入的话却要找到前驱后继再插入,非常麻烦 那么我们把它变成只删除的回滚莫队就 ...

  3. loj#6517. 「雅礼集训 2018 Day11」字符串(回滚莫队)

    传送门 模拟赛的时候纯暴力竟然骗了\(70\)分-- 首先对于一堆\(g\)怎么计算概率应该很好想,用总的区间数减去不合法的区间数就行了,简而言之对\(g\)排个序,每一段长为\(d\)的连续序列的区 ...

  4. BZOJ.4826.[AHOI/HNOI2017]影魔(树状数组/莫队 单调栈)

    BZOJ LOJ 洛谷 之前看\(mjt\)用莫队写了,以为是一种正解,码了3h结果在LOJ T了没A= = 心态爆炸(upd:发现是用C++11(NOI)交的,用C++11交就快一倍了...) 深刻 ...

  5. [Ynoi2016]这是我自己的发明(莫队)

    话说这道题数据是不是都是链啊,我不手动扩栈就全 \(RE\)... 不过 \(A\) 了这题还是很爽的,通过昨晚到今天早上的奋斗,终于肝出了这题 其实楼上说的也差不多了,就是把区间拆掉然后莫队瞎搞 弱 ...

  6. BZOJ4241:历史研究(回滚莫队)

    Description IOI国历史研究的第一人——JOI教授,最近获得了一份被认为是古代IOI国的住民写下的日记.JOI教授为了通过这份日记来研究古代IOI国的生活,开始着手调查日记中记载的事件. ...

  7. 「雅礼集训 2018 Day5」Convex 凸包、莫队

    LOJ 看到离线区间操作仍然考虑莫队,然后可以发现:我们对于原来的凸包集合按照极角序维护一个链表,那么删除一个位置可以\(O(1)\),撤回删除操作也可以\(O(1)\)(因为原来的链表结构中当前节点 ...

  8. bzoj5016 & loj2254 [Snoi2017]一个简单的询问 莫队

    题目传送门 https://lydsy.com/JudgeOnline/problem.php?id=5016 https://loj.ac/problem/2254 题解 原式是这样的 \[ \su ...

  9. BZOJ 3289: Mato的文件管理[莫队算法 树状数组]

    3289: Mato的文件管理 Time Limit: 40 Sec  Memory Limit: 128 MBSubmit: 2399  Solved: 988[Submit][Status][Di ...

随机推荐

  1. Node模块化

    Node.js是一个能够在服务器端运行JavaScript的开放源代码.跨平台JavaScript运行环境.Node是对ES标准一个实现,也是一个JS引擎.与传统服务器不同是Node的服务器是单线程的 ...

  2. min-25筛学习笔记

    Min_25筛简介 \(\text{min_25}\)筛是一种处理一类积性函数前缀和的算法. 其中这类函数\(f(x)\)要满足\(\sum_{i=1}^{n}[i\in prime]\cdot f( ...

  3. python多线程爬取世纪佳缘女生资料并简单数据分析

    一. 目标 ​ 作为一只万年单身狗,一直很好奇女生找对象的时候都在想啥呢,这事也不好意思直接问身边的女生,不然别人还以为你要跟她表白啥的,况且工科出身的自己本来接触的女生就少,即使是挨个问遍,样本量也 ...

  4. 二分法在JavaScript中的应用实例

    前言:原来一直对算法和数据结构望而却步,总觉得前端可能对这块要求不用那么高,但是随着开发经验的增长以及阅历的提升,发现算法和数据结构还是相当重要的,在一些复杂功能的研发中都可以看得到它们的身影.要想提 ...

  5. Linux 中ifconfig和ip addr命令看不到ip

    解决方案: 输入 vi /etc/sysconfig/network-scripts/ifcfg-ens33 将ONBOOT权限改为yes 保存退出,按Esc,输入:wq 重启网络服务,输入 sudo ...

  6. [jsp学习笔记] jsp基础知识 数据初始化、同步

  7. Java调用WebService方法总结(6)--XFire调用WebService

    XFire是codeHaus组织提供的一个WebService开源框架,目前已被Apache的CXF所取代,已很少有人用了,这里简单记录下其调用WebService使用方法.官网现已不提供下载,可以到 ...

  8. 一个 Vim 重度用户总结的 vim 超全指南

    我本人是 Vim 的重度使用者,就因为喜欢上这种双手不离键盘就可以操控一切的feel,Vim 可以让我对文本的操作更加精准.高效. 对于未使用过 Vim 的朋友来说,可能还无法体会到这种感觉.由于使用 ...

  9. dubbo源码阅读之负载均衡

    负载均衡 在之前集群的文章中,我们分析了通过监听注册中心可以获取到多个服务提供者,并创建多个Invoker,然后通过集群类如FailoverClusterInvoker将多个Invoker封装在一起, ...

  10. vue中使用iview组件库实现图片的上传

    vue文件如下: iview中Upload 属性详情 https://www.iviewui.com/components/upload js文件 :