我给这道题提供了314次提交qwq

题目大意

给定一个长为 \(n\) 的序列,每次询问给定一个 \(L\) 和 \(R\),求 \([L,R]\) 中所有数乘起来的质因数个数,答案对 \(19260817\) 取余。

首先,静态区间,区间询问,想到莫队。

所有我们需要将所有质因数拆出来,莫队的时候转移。

时间复杂度: \(O(n\sqrt n)\)

你以为这就完了?善良毒瘤的lxl卡了常数Ynoi常见操作,所有我们需要优化。

拆分质因数,可以用 \(\rm PR\) 来分解质因数,不过还是太慢。其实我们可以给定一个小范围,把这个范围的质数都找出来,剩下的再用 \(\rm PR\)。

那么这个范围应该是多少呢?

我们要让 \(\rm PR\) 的次数尽量小,然而 \(a_i \leq 10^9\),取 \(10^4\) 就如同暴力,取 \(10^2\) 又要很多次 \(\rm PR\),所以取 \(10^3\)。\(1001^3 > 10^9\),说明在这个范围中,去掉小的因数就只有最多 \(2\) 个因数qwq。

于是我们交上去:link

T了。说明还能继续卡。

其实可以用 \(1 \sim 1000\) 中的质数来筛,最开始我使用的是打表,后来换成了xxs。

然后是莫队的转移。\(10^9\) 的范围内,一个数最多拥有 \(10\) 个质因数,那么每次转移的常数就很大,所以考虑开桶记录 \(1 \sim 1000\) 中所有质数在序列上的前缀和,直接减。

然后我们取得了84分的好成绩。

那么,我们还需要什么?

首先,只调用一次的函数拆封装,会影响效率。

其次,在一个函数中,假如有一个 \(Tp\) 类型的变量不会发生变化,我们就把 Tp a 改成 const Tp&a

然后,把所有 ==!= 换成用 ^ 实现的。

最后,\(fread\) 快读和 \(fwrite\) 快输是一定需要的qwq。

我们还差些什么?

rp,评测姬。

于是:link

麻麻快看!我A了一道Ynoi!

贴一下代码:

#pragma GCC optimize("Ofast,unroll-loops,fast-math")
#include<unordered_map>
#include<algorithm>
#include<cstring>
#include<cstdlib>
#include<cstdio>
#include<cctype>
#include<cmath>
#define DEBUG printf("Baylor AK IOI\n");
int pcnt,prime[300005];bool zhi[1000005];
inline int mo(const long long&a,const int&mod){
return a<mod?a:a-int(a/mod)*mod;
}
inline void sieve(const int&n){
int i,j,x;
for(i=2;i<=n;++i){
if(!zhi[i])prime[++pcnt]=i;
for(j=1;j<=pcnt&&(x=i*prime[j])<=n;++j){
zhi[x]=true;
if(!(i%prime[j]))break;
}
}
}
namespace IO{
const int SIZE=1<<21;
class istream{
private:
char buf[SIZE],*p1=buf,*p2=buf;
public:
inline char getchar(){
if(p1==p2)p2=(p1=buf)+fread(buf,1,SIZE,stdin);
return p1==p2?-1:*p1++;
}
inline istream&operator>>(int&a){
char s;
a=0;
while(!isdigit(s=getchar()));
while(a=a*10+(s^48),isdigit(s=getchar()));
return*this;
}
}cin;
class ostream{
private:
int p1=-1;
char buf[SIZE];
const int p2=SIZE-1;
public:
inline void flush(){
fwrite(buf,1,p1+1,stdout);
p1=-1;
}
inline void putchar(const char&s){
if(p1==p2)flush();
buf[++p1]=s;
}
inline ostream&operator<<(int&n){
static char s[33];
int top=0;
while(s[++top]=(n%10)^48,n/=10);
while(putchar(s[top]),--top);
return*this;
}
}cout;
}
namespace Pollard_Rho{
inline int abs(const int&a){
return a>0?a:-a;
}
inline int Rand(const int&mod){
return mo(rand()*rand(),mod);
}
const int Pcnt=2;
const int p[Pcnt]={61,103};
inline int min(const int&a,const int&b){
return a>b?b:a;
}
inline int gcd(register int a,register int b){
while(b^=a^=b^=a%=b);
return a;
}
inline int pow(register int a,register int b,const register int&mod){
register int ans=1;
for(;b;b>>=1,a=mo(1ll*a*a,mod))if(b&1)ans=mo(1ll*ans*a,mod);
return ans;
}
bool IsPrimeIt(const register int&n){
if(n%6^1&&n%6^5||n<2)return false;
if(n<=1000000)return!zhi[n];
register int m=n-1,k=__builtin_ctz(m);m>>=k;
for(register int i,j=0;j^Pcnt;++j){
register int x=pow(p[j],m,n),y=x;
for(i=0;i^k;++i){
x=mo(1ll*x*x,n);
if(!(x^1)&&(y^1)&&(y^n-1))return false;
y=x;
}
if(x^1)return false;
}
return true;
}
inline int PR(const register int&x){
register int len=0,k=1;
register int v0=Rand(x-1)+1,v=v0,y=Rand(x-1)+1,d,s=1;
while(true){
v=mo((mo(1ll*v*v,x)+y),x),s=mo(1ll*s*abs(v-v0),x);
if(v==v0||!s)return x;
if(++len==k){
if((d=gcd(s,x))^1)return d;
v0=v;k<<=1;
}
}
}
inline int dmp(const int&x){
int d;
while((d=PR(x))==x);
return d;
}
}
namespace Main{
const int M=1e5+5,mod=19260817;
int n,m,d[M],top[M],a[M][3],sum[M][169];
std::unordered_map<int,int>Dct;
int tp,pri[M<<1],inv[M<<1];
int p,cur=1,ans[M],cnt[M<<1];
struct Query{
int L,R,p1,p2,id;
inline bool operator<(const Query&a) const {
return p1^a.p1?L<a.L:p1&1?R<a.R:R>a.R;
}
}q[M];
inline int abs(const int&a){
return (a>0?0:n<<1)+a;
}
inline void Add(const register int&id){
for(register int i=1;i<=top[id];++i){
cur=1ll*cur*inv[abs(cnt[a[id][i]])]%mod*abs(++cnt[a[id][i]])%mod;
}
}
inline void Del(const register int&id){
for(register int i=1;i<=top[id];++i){
cur=1ll*cur*inv[abs(cnt[a[id][i]])]%mod*abs(--cnt[a[id][i]])%mod;
}
}
inline void main(){
register int i,j,L=1,R=0;
IO::cin>>n>>m;
p=n/sqrt(2.0*m/3);
for(i=1;i<=n;++i){
int&val=d[i],x;
IO::cin>>val;
memcpy(sum[i],sum[i-1],676);
for(j=1;j<=168&&(x=prime[j])<=val;++j){
if(!(val%x)){
while(!(val%x)){
++sum[i][j];
val/=x;
}
}
}
if(!(val^1))continue;
if(Pollard_Rho::IsPrimeIt(val)){
a[i][++top[i]]=pri[++tp]=val;
continue;
}
while(!((x=Pollard_Rho::PR(val))^val));
if(x*x==val){
a[i][++top[i]]=pri[++tp]=x;
a[i][++top[i]]=x;
continue;
}
a[i][++top[i]]=pri[++tp]=x;
a[i][++top[i]]=pri[++tp]=val/x;
}
std::sort(pri+1,pri+tp+1);
for(i=1;i<=tp;++i)cnt[Dct[pri[i]]=i]=1;
for(i=1;i<=n;++i){
for(j=1;j<=top[i];++j){
a[i][j]=Dct[a[i][j]];
}
}
inv[1]=1;
for(i=2;i<=(n<<1);++i)inv[i]=1ll*(mod-mod/i)*inv[mod%i]%mod;
for(i=1;i<=m;++i){
IO::cin>>(q+i)->L>>(q+i)->R;
(q+i)->p1=(q+i)->L/p;(q+i)->p2=(q+i)->R/p;
(q+i)->id=i;
}
std::sort(q+1,q+m+1);
for(i=1;i<=m;++i){
int&QL=(q+i)->L,&QR=(q+i)->R;
while(L<QL)Del(L++);
while(R>QR)Del(R--);
while(L>QL)Add(--L);
while(R<QR)Add(++R);
int&out=ans[(q+i)->id];out=cur;
for(j=1;j<=168;++j)out=mo(1ll*out*(sum[QR][j]-sum[QL-1][j]+1),mod);
}
for(i=1;i<=m;++i)IO::cout<<ans[i],IO::cout.putchar(10);
}
}
signed main(){
srand(19260817);
sieve(1000000);
Main::main();
IO::cout.flush();
}

LGP5071题解的更多相关文章

  1. 2016 华南师大ACM校赛 SCNUCPC 非官方题解

    我要举报本次校赛出题人的消极出题!!! 官方题解请戳:http://3.scnuacm2015.sinaapp.com/?p=89(其实就是一堆代码没有题解) A. 树链剖分数据结构板题 题目大意:我 ...

  2. noip2016十连测题解

    以下代码为了阅读方便,省去以下头文件: #include <iostream> #include <stdio.h> #include <math.h> #incl ...

  3. BZOJ-2561-最小生成树 题解(最小割)

    2561: 最小生成树(题解) Time Limit: 10 Sec  Memory Limit: 128 MBSubmit: 1628  Solved: 786 传送门:http://www.lyd ...

  4. Codeforces Round #353 (Div. 2) ABCDE 题解 python

    Problems     # Name     A Infinite Sequence standard input/output 1 s, 256 MB    x3509 B Restoring P ...

  5. 哈尔滨理工大学ACM全国邀请赛(网络同步赛)题解

    题目链接 提交连接:http://acm-software.hrbust.edu.cn/problemset.php?page=5 1470-1482 只做出来四道比较水的题目,还需要加强中等题的训练 ...

  6. 2016ACM青岛区域赛题解

    A.Relic Discovery_hdu5982 Time Limit: 2000/1000 MS (Java/Others)    Memory Limit: 65536/65536 K (Jav ...

  7. poj1399 hoj1037 Direct Visibility 题解 (宽搜)

    http://poj.org/problem?id=1399 http://acm.hit.edu.cn/hoj/problem/view?id=1037 题意: 在一个最多200*200的minec ...

  8. 网络流n题 题解

    学会了网络流,就经常闲的没事儿刷网络流--于是乎来一发题解. 1. COGS2093 花园的守护之神 题意:给定一个带权无向图,问至少删除多少条边才能使得s-t最短路的长度变长. 用Dijkstra或 ...

  9. CF100965C题解..

    求方程 \[ \begin{array}\\ \sum_{i=1}^n x_i & \equiv & a_1 \pmod{p} \\ \sum_{i=1}^n x_i^2 & ...

随机推荐

  1. Docker部署lnmp 实战 (多注意配置文件,不管访问试试换个浏览器)

    Docker部署LNMP环境 关闭防火墙,设置自定义网络 systemctl stop firewalld systemctl disable firewalld setenforce 0 docke ...

  2. Spark算子 - groupBy

    释义 根据RDD中的某个属性进行分组,分组后形式为(k, [(k, v1), (k, v2), ...]),即groupBy 后组内元素会保留key值 方法签名如下: def groupBy[K](f ...

  3. ios真机弱网测试

    一.开启苹果手机开发者选项 首先你需要将iPhone和一台Mac电脑相连接,然后在Mac上打开Xcode开发工具,此时你iPhone的设置里就会出现"开发者"这个选项了. 二.进入 ...

  4. Solution -「CF 599E」Sandy and Nuts

    \(\mathcal{Description}\)   Link.   指定一棵大小为 \(n\),以 \(1\) 为根的有根树的 \(m\) 对邻接关系与 \(q\) 组 \(\text{LCA}\ ...

  5. [LeetCode]3.无重复字符的最长子串(Java)

    原题地址: longest-substring-without-repeating-characters/submissions 题目描述: 示例 1: 输入: s = "pwwkew&qu ...

  6. suse 12 二进制部署 Kubernetets 1.19.7 - 第11章 - 部署coredns组件

    文章目录 1.11.0.部署coredns 1.11.1.测试coredns功能 suse 12 二进制部署 Kubernetes 集群系列合集: suse 12 二进制部署 Kubernetets ...

  7. leetcode算法1.两数之和

    哈喽!大家好,我是[学无止境小奇],一位热爱分享各种技术的博主! [学无止境小奇]的创作宗旨:每一条命令都亲自执行过,每一行代码都实际运行过,每一种方法都真实实践过,每一篇文章都良心制作过. [学无止 ...

  8. 利用iptables做网络转发

    常见的网络拓扑图结构如下: 但是内网服务器偶尔有上网需求,比如yum工具,wget文件.而我们又不能让重要业务直接暴露在公网上. 好用的安全策略有:三层交换机.路由器做nat映射,防火墙做安全策略. ...

  9. 常用环境变量配置(vim /etc/profile)

    安装,参考:https://www.cnblogs.com/uncleyong/category/1457906.html # jdk export JAVA_HOME=/usr/local/jdk1 ...

  10. 16进制转字符串得到flag

    工业协议分析2 666c61677b37466f4d3253746b6865507a7d