https://scut.online/p/157

鉴于多年(都没几个月)搞数论的经验,这种时候枚举g肯定是对的。

那么肯定是要莫比乌斯函数作为因子,因为很显然?

但是为什么要搞个负的呢?其实是因为这个题目的g1的时候并不都是合法的,反而是g2的时候都是合法的,所以g==6的时候才是重复的。

然后考虑怎么统计他们的倍数。

每次都因数分解,是很慢的。

考虑到这题的特征,数字特别小。用个cnt把每个数字都数一数。

然后从小的数字开始把它所有的倍数都加在它身上。

最后预处理一波组合数就可以了。

整体复杂度每次是\(O(nlogn)\)的,比\(O(n\sqrt{n})\)快了近10倍。

不过最后还是快读最快啊233!

#include<bits/stdc++.h>
using namespace std;
typedef long long ll; const int MAXN=1e5; int pri[MAXN+5];
int &pritop=pri[0];
int mu[MAXN+5];
void sieve(int n=MAXN) {
mu[1]=1;
for(int i=2; i<=n; i++) {
if(!pri[i]) {
pri[++pritop]=i;
mu[i]=-1;
}
for(int j=1; j<=pritop; j++) {
int &p=pri[j];
int t=i*p;
if(t>n)
break;
pri[t]=1;
if(i%p) {
mu[t]=-mu[i];
} else {
mu[t]=0;
break;
}
}
}
} const int mod=1e9+7; int inv[MAXN+5],fac[MAXN+5],invfac[MAXN+5]; void init_fac_invfac(int n=MAXN) {
inv[1]=1;
for(int i=2; i<=n; i++)
inv[i]=1ll*inv[mod%i]*(mod-mod/i)%mod;
fac[0]=1,invfac[0]=1;
for(int i=1; i<=n; i++) {
fac[i]=1ll*fac[i-1]*i%mod;
invfac[i]=1ll*invfac[i-1]*inv[i]%mod;
}
} inline ll C(ll n,ll m) {
if(n<m)
return 0;
return 1ll*fac[n]*invfac[n-m]%mod*invfac[m]%mod;
} inline int read(){
int x=0;
char c=getchar();
while(c<'0'||c>'9')
c=getchar();
do{
x=(x<<3)+(x<<1)+c-'0';
c=getchar();
}while(c>='0'&&c<='9');
return x;
} inline void write(int x){
if(x>9){
write(x/10);
}
putchar(x%10+'0');
return;
} int cnt[MAXN+5];
int main() {
#ifdef Yinku
freopen("Yinku.in","r",stdin);
#endif // Yinku
sieve();
init_fac_invfac();
int n,m;
while(~scanf("%d%d",&n,&m)) {
memset(cnt,0,sizeof(cnt));
for(int i=1; i<=n; i++) {
int tmp=read();
cnt[tmp]++;
}
for(int d=2;d<=100000;d++){
for(int td=d+d;td<=100000;td+=d)
cnt[d]+=cnt[td];
}
ll sum=0;
for(int d=2; d<=100000; d++) {
if(mu[d]==0||cnt[d]<m)
continue;
ll tmp=(-mu[d])*C(cnt[d],m);
if(tmp>=mod||tmp<=-mod) {
tmp%=mod;
}
if(tmp<0)
tmp+=mod;
sum+=tmp;
if(sum>=mod)
sum-=mod;
}
write((int)sum);
puts("");
}
}

SCUT - 157 - CC和他的GCD - 容斥原理的更多相关文章

  1. 51nod 1678 lyk与gcd | 容斥原理

    51nod 200题辣ψ(`∇´)ψ !庆祝! 51nod 1678 lyk与gcd | 容斥原理 题面 这天,lyk又和gcd杠上了. 它拥有一个n个数的数列,它想实现两种操作. 1:将 ai 改为 ...

  2. HDU 1695 GCD#容斥原理

    http://acm.hdu.edu.cn/showproblem.php?pid=1695 翻译题目:给五个数a,b,c,d,k,其中恒a=c=1,x∈[a,b],y∈[c,d],求有多少组(x,y ...

  3. hdu1695 GCD 容斥原理

    Given 5 integers: a, b, c, d, k, you're to find x in a...b, y in c...d that GCD(x, y) = k. GCD(x, y) ...

  4. SCUT - 354 - CC的简单多项式 - 杜教筛

    https://scut.online/p/354 跟多项式一点关系都没有. 注意到其实两个多项式在1处求值,那么就是他们的系数加起来. 列一列发现系数就是n以内两两求gcd的值,还自动把0去掉了. ...

  5. CC DGCD:Dynamic GCD——题解

    https://vjudge.net/problem/CodeChef-DGCD https://www.codechef.com/problems/DGCD 题目大意: 给一颗带点权的树,两个操作: ...

  6. SCUT - 274 - CC B-Tree - 树形dp

    https://scut.online/p/274 首先要判断是一颗树,并且找出树的直径. 是一棵树,首先边恰好有n-1条,其次要连通,这两个条件已经充分了,当然判环可以加速. 两次dfs找出直径,一 ...

  7. SCUT - 271 - CC 非诚勿扰 - FFT

    https://scut.online/p/271 第一次遇到没这么裸的,其实感觉到是卷积但是不知道怎么化.看来以后要多注意下标. #include <bits/stdc++.h> usi ...

  8. 1052 - String Growth

    1052 - String Growth    PDF (English) Statistics Forum Time Limit: 2 second(s) Memory Limit: 32 MB Z ...

  9. POJ 2115 C Looooops

    扩展GCD...一定要(1L<<k),不然k=31是会出错的 ....                        C Looooops Time Limit: 1000MS   Mem ...

随机推荐

  1. 【linux】让普通用户执行root的程序

    再有些时候,比如zabbix监控中,需要使用netstat命令查看当前网络链接状态,但是zabbix用户没有权限执行netstat,会导致监控失败,为此使用如下即可解决 chmod +s /bin/n ...

  2. Java for LeetCode 097 Interleaving String 【HARD】

    Given s1, s2, s3, find whether s3 is formed by the interleaving of s1 and s2. For example, Given: s1 ...

  3. Data Structure Binary Tree: Level order traversal in spiral form

    http://www.geeksforgeeks.org/level-order-traversal-in-spiral-form/ #include <iostream> #includ ...

  4. 3 《锋利的jQuery》jQuery中的DOM操作

    DOM操作分(1)DOM Core(核心):document.geElementsByTagName("form");/ element.getAttribute("sr ...

  5. 《C prime plus (第五版)》 ---第11章 字符串和字符串函数---2

    11-3:字符串 输出 三个标准的函数:puts() fputs() printf() 1.puts()函数: #include<stdio.h> #define DEF "I ...

  6. cmake编译后vs编译(build Solution)报错的解决办法

    很久没有写blog了,最近在kdevelop上开发程序的时候,需要在主函数的文件中引用别的文件的函数,添加了对该函数所在的头文件之后仍然出现该函数没有定义的错误.经历了一番波折之后,才发现是忘记了在c ...

  7. BZOJ 1657 [Usaco2006 Mar]Mooo 奶牛的歌声:单调栈【高度序列】

    题目链接:http://www.lydsy.com/JudgeOnline/problem.php?id=1657 题意: Farmer John的N(1<=N<=50,000)头奶牛整齐 ...

  8. CSS样式命名整理

    CSS样式命名整理 页面结构 容器: container/wrap 整体宽度:wrapper 页头:header 内容:content 页面主体:main 页尾:footer 导航:nav 侧栏:si ...

  9. ES搜索排序,文档相关度评分介绍——TF-IDF—term frequency, inverse document frequency, and field-length norm—are calculated and stored at index time.

    Theory Behind Relevance Scoring Lucene (and thus Elasticsearch) uses the Boolean model to find match ...

  10. 为什么修改头文件make不重新编译

    make是根据依赖文件的时间戳来决定要不要重新编译的.在: object: deplist # actions 中,可以把头文件加进deplist,这样修改头文件后,make就会重新编译了. 单纯地修 ...