题目链接:http://acm.hdu.edu.cn/showproblem.php?pid=6390
#include<bits/stdc++.h>
using namespace std;
#define debug puts("YES");
#define rep(x,y,z) for(int (x)=(y);(x)<(z);(x)++)
#define ll long long
#define lrt int l,int r,int rt
#define lson l,mid,rt<<1
#define rson mid+1,r,rt<<1|1
#define root l,r,rt
#define mst(a,b) memset((a),(b),sizeof(a))
const int maxn =1e6+5;
const int ub=1e6;
/*
题目大意:求式子。
无语到最后我把式子化简到最后却T了。
只要看出来euler(a)*euler(b)/euler(a*b),
最后通过一个技巧可以变成gcd(a,b)/euler(gcd(a,b)),
莫比乌斯反演看到gcd啥的就瞬间思路很简单了,
到最后是要处理个二维前缀互质二元组个数,
总体复杂度是O(nlogn)。
*/
ll n,m,mod;
ll ans,maxv;
///筛法筛莫比乌斯函数和欧拉函数
int prim[maxn/10],tot=0;
int vis[maxn],euler[maxn],miu[maxn];
ll G[maxn],g[maxn],inv[maxn];
void get_inv()
{
inv[1]=1;
for(int i=2;i<maxv ;i++) inv[i]=1LL*(mod-mod/i)*inv[mod%i]%mod;
}
void sieve()
{
miu[1]=euler[1]=1;
for(int i=2;i<maxn;i++)
{
if(vis[i]==0) prim[tot++]=i,miu[i]=-1,euler[i]=i-1;
for(int j=0;j<tot;j++)
{
if(1LL*i*prim[j]>=maxn) break;
int k=i*prim[j];vis[k]=1;
if(i%prim[j])
{
miu[k]=-miu[i];
euler[k]=euler[i]*(prim[j]-1);
}
else
{
euler[k]=euler[i]*prim[j];
break;
}
}
}
for(int i=1;i<maxn;i++) miu[i]+=miu[i-1];
}
ll cal(ll l,ll r)
{
ll minv=min(l,r),ret=0;
for(int i=1,j;i<=minv;i=j+1)
{
j=min(l/(l/i),r/(r/i));
ret+=(miu[j]-miu[i-1]+mod)*(l/i)%mod*(r/i)%mod;
ret%=mod;
}
return ret;
}
int main()
{
int t;scanf("%d",&t);
sieve();
while(t--)
{
scanf("%lld%lld%lld",&n,&m,&mod);
if(n>m) swap(n,m);
ans=0,maxv=n+1;
get_inv();
for(int i=1,j;i<maxv;i++)
{
ans+=i*inv[euler[i]]%mod*cal(n/i,m/i)%mod;
ans%=mod;
}
printf("%lld\n",ans);
}
return 0;
}