分析
下文中，设 $n\leq m$ ，$n/m=\left\lfloor\frac{n}{m}\right\rfloor$ 。
为了方便，设 $S(n)=\sum_{i=1}^ni=\frac{n(n+1)}{2}$ 。
令 $\mathbf{f}(i)=\frac{1}{i}$，$\mathbf{g}(i)=\mathbf{f}*\mu$ 。
$$\begin{aligned}&\sum_{i=1}^n\sum_{j=1}^m\operatorname{lcm}(i,j)\\=&\sum_{i=1}^n\sum_{j=1}^m\frac{ij}{\gcd(i,j)}\\=&\sum_{i=1}^ni\sum_{j=1}^mj\,\mathbf{f}(\gcd(i,j))\\=&\sum_{i=1}^ni\sum_{j=1}^mj\sum_{d|i,d|j}\mathbf{g}(d)\\=&\sum_{d=1}^n\left(\sum_{k|d}\frac{\mu(k)}{\frac{d}{k}}\right)\sum_{i=1}^{n/d}id\sum_{j=1}^{m/d}jd\\=&\sum_{d=1}^n\left(d\sum_{k|d}k\mu(k)\right)\sum_{i=1}^{n/d}i\sum_{j=1}^{m/d}j\\=&\sum_{d=1}^n\left(d\sum_{k|d}k\mu(k)\right)S\left(\left\lfloor\frac{n}{d}\right\rfloor\right)S\left(\left\lfloor\frac{m}{d}\right\rfloor\right)\end{aligned}$$
括号内线性筛预处理，然后数论分块计算即可。
代码
// ===================================
// author: M_sea
// website: http://m-sea-blog.com/
// ===================================
#include <algorithm>
#include <iostream>
#include <cstdlib>
#include <cstring>
#include <cstdio>
#include <cmath>
#define re register
using namespace std;
inline int read() {
int X=0,w=1; char c=getchar();
while (c<'0'||c>'9') { if (c=='-') w=-1; c=getchar(); }
while (c>='0'&&c<='9') X=X*10+c-'0',c=getchar();
return X*w;
}
const int N=10000000+10;
const int mod=20101009;
int p[N],v[N],cnt=0;
int f[N];
inline void sieve(int n) {
f[1]=1;
for (re int i=2;i<=n;++i) {
if (!v[i]) p[++cnt]=i,f[i]=mod-i+1;
for (re int j=1;j<=cnt&&i*p[j]<=n;++j) {
v[i*p[j]]=1;
if (i%p[j]) f[i*p[j]]=1ll*f[i]*f[p[j]]%mod;
else { f[i*p[j]]=f[i]; break; }
}
}
for (re int i=1;i<=n;++i) f[i]=1ll*f[i]*i%mod;
for (re int i=1;i<=n;++i) f[i]=(f[i]+f[i-1])%mod;
}
inline int S(int n) { return 1ll*n*(n+1)/2%mod; }
int main() {
int n=read(),m=read(); if (n>m) swap(n,m);
sieve(n); int ans=0;
for (re int l=1,r;l<=n;l=r+1) {
r=min(n/(n/l),m/(m/l));
ans=(ans+1ll*(f[r]-f[l-1]+mod)%mod*S(n/l)%mod*S(m/l))%mod;
}
printf("%d\n",ans);
return 0;
}
5 条评论
您好像写错了一个地方
哪儿呢
捕捉神仙 @xgzc 和神仙 @m_sea！
方法二第五行为什么是mu(k)/k啊
出锅了