题目
求 ∑ i = 1 n ∑ j = 1 m l c m ( i , j ) \sum_{i=1}^n\sum_{j=1}^mlcm(i,j) i=1∑nj=1∑mlcm(i,j)
分析
原式=
∑
i
=
1
n
∑
j
=
1
m
i
j
g
c
d
(
i
,
j
)
\sum_{i=1}^n\sum_{j=1}^m\frac{ij}{gcd(i,j)}
i=1∑nj=1∑mgcd(i,j)ij
那么原式=
∑
d
=
1
m
i
n
(
n
,
m
)
d
×
∑
i
=
1
⌊
n
d
⌋
∑
j
=
1
⌊
m
d
⌋
[
g
c
d
(
i
,
j
)
=
1
]
×
i
×
j
\sum_{d=1}^{min(n,m)}d\times \sum_{i=1}^{\lfloor\frac{n}{d}\rfloor}\sum_{j=1}^{\lfloor\frac{m}{d}\rfloor}[gcd(i,j)=1]\times i\times j
d=1∑min(n,m)d×i=1∑⌊dn⌋j=1∑⌊dm⌋[gcd(i,j)=1]×i×j
根据莫比乌斯反演可以得到原式=
∑
d
=
1
m
i
n
(
n
,
m
)
d
∑
t
=
1
m
i
n
(
⌊
n
d
⌋
,
⌊
m
d
⌋
)
t
2
μ
(
t
)
∑
i
=
1
⌊
n
d
t
⌋
i
∑
j
=
1
⌊
m
d
t
⌋
j
\sum_{d=1}^{min(n,m)}d\sum_{t=1}^{min(\lfloor\frac{n}{d}\rfloor,\lfloor\frac{m}{d}\rfloor)}t^2\mu(t)\sum_{i=1}^{\lfloor\frac{n}{dt}\rfloor}i\sum_{j=1}^{\lfloor\frac{m}{dt}\rfloor}j
d=1∑min(n,m)dt=1∑min(⌊dn⌋,⌊dm⌋)t2μ(t)i=1∑⌊dtn⌋ij=1∑⌊dtm⌋j
就可以预处理
t
2
μ
(
t
)
t^2\mu(t)
t2μ(t),用整除分块求解,时间复杂度大概是
O
(
n
)
O(n)
O(n)
代码
#include <cstdio>
#define rr register
#define min(a,b) ((a)<(b)?(a):(b))
#define res(n,m) ((1ll*n*(n+1)>>1)%mod*((1ll*m*(m+1)>>1)%mod)%mod)
using namespace std;
const int mod=20101009,M=10000010;
int n,m,v[M],prime[M],s[M],cnt;
inline void prepa(int N){
s[1]=1;
for (rr int i=2;i<=N;++i){
if (!v[i]) s[i]=-1,v[i]=prime[++cnt]=i;
for (rr int j=1;j<=cnt&&prime[j]*i<=N;++j){
v[i*prime[j]]=prime[j];
if (i%prime[j]) s[i*prime[j]]=-s[i];
else break;
}
}
for (rr int i=1;i<=N;++i) s[i]=1ll*i*i%mod*(s[i]+mod)%mod;
for (rr int i=2;i<=N;++i) (s[i]+=s[i-1])%=mod;
}
inline signed answ(int n,int m){
rr int ans=0,t=min(n,m);
for (rr int l=1,r;l<=t;l=r+1){
r=min(n/(n/l),m/(m/l));
(ans+=1ll*(s[r]-s[l-1]+mod)*res(n/l,m/l)%mod)%=mod;
}
return ans;
}
inline signed solve(int n,int m){
rr int ans=0,t;
prepa(t=min(n,m));
for (rr int l=1,r;l<=t;l=r+1){
r=min(n/(n/l),m/(m/l));
(ans+=(1ll*(r-l+1)*(l+r)>>1)%mod*answ(n/l,m/l)%mod)%=mod;
}
return ans;
}
signed main(){
scanf("%d%d",&n,&m);
printf("%d",solve(n,m));
return 0;
}