一道玄学题...
其实一开始想的是对的，优化一下就好了
首先我们会发现，乘积不能被完全平方数整除等价于所有因子的每个质因子个数和都至多为1
可是500以内的质数很多，全找出来会爆炸的
可我们会发现，如果一个数的平方会在500以内，那么这个数一定<=22！
所以，1~500中会存在的完全平方数的质因子一定在22以内
这些质数只有八个，所以我们可以找出来
至于剩下的部分，显然23和46是不嫩同时出现的，所以我们把含有23这个因子的所有数分到一个背包里，对每个背包只允许使用其中的一个数，这样就能满足23等只出现一次，对其他更大的质数也是同理
什么？你说会不会重？
23*23>500，那么剩下所有的乘积都大于500，也就是说如果我们只用23及以上的质数分组，每组中的元素是互不重叠的。
什么？你说前面几个小的质数怎么办？
状压啊！
求出每个数对于前面八个质数（是的，小于23的质数有8个，分别为2,3,5,7,11,13,17,19），而言质因子的状态，用二进制表示（如15的质因子状态可以表示为110，即0个2,1个3，一个5）
至于那些用大质数表示不了的数，我们把他们每个单独分包即可。
在转移的时候，我们就可以第一层：枚举所有包，第二层：枚举包中每个元素，第三层：枚举前八个质数的所有状态，第四层：枚举前面用过的数的个数
这样就可以实现转移了，因为每次转移都是上一个包向下一个包去转移，所以包中元素是没有重复的。
当然，我本人在写代码的时候，选择把所有不能分到其他包里的元素全分到第一个包里，然后单独处理第一个包。
#include <cstdio>
#include <cmath>
#include <cstring>
#include <cstdlib>
#include <iostream>
#include <algorithm>
#include <queue>
#include <stack>
#define ll long long
#define mode 1000000007
using namespace std;
int cnt=;
int pri[];
bool vis[];
ll dp[][(<<)+][];
int sit[];
bool used[];
int bag[][];
int cct[];
int posi[];
int n,k;
void init()
{
for(int i=;i<=;i++)
{
if(!vis[i])
{
pri[cnt++]=i;
}
for(int j=;j<cnt&&i*pri[j]<=;j++)
{
vis[i*pri[j]]=;
if(!i%pri[j])
{
break;
}
}
}
}
void get_bag()
{
bag[][++cct[]]=;
for(int i=;i<=;i++)
{
bool flag=;
for(int t=;t<cnt&&i>=pri[t];t++)
{
if(i%pri[t]==)
{
cct[t-]++;
flag=;
bag[t-][cct[t-]]=i;
break;
}
}
if(!flag)
{
cct[]++;
bag[][cct[]]=i;
}
}
}
void get_ori()
{
sit[]=;
for(int i=;i<=;i++)
{
int t=i;
for(int j=;j<;j++)
{
int cot=;
while(t%pri[j]==)
{
t/=pri[j];
cot++;
}
if(cot>=)
{
used[i]=;
break;
}else if(cot==)
{
sit[i]|=(<<j);
}
}
}
}
int main()
{
int T;
scanf("%d",&T);
init();
get_ori();
get_bag();
while(T--)
{
scanf("%d%d",&n,&k);
memset(dp,,sizeof(dp));
dp[][][]=;
int now=,past=;
for(int i=;i<=cct[];i++)
{
memset(dp[now],,sizeof(dp[now]));
for(int j=;j<(<<);j++)
{
for(int t=;t<=k;t++)
{
dp[now][j][t]=dp[past][j][t];
}
}
for(int j=;j<(<<);j++)
{
for(int t=;t<k;t++)
{
if(!(sit[bag[][i]]&j)&&!used[bag[][i]]&&bag[][i]<=n)
{
dp[now][j|sit[bag[][i]]][t+]+=dp[past][j][t];
dp[now][j|sit[bag[][i]]][t+]%=mode;
}
}
}
swap(now,past);
}
for(int i=;i<=cnt-;i++)
{
memset(dp[now],,sizeof(dp[now]));
for(int j=;j<(<<);j++)
{
for(int t=;t<=k;t++)
{
dp[now][j][t]=dp[past][j][t];
}
}
for(int f=;f<=cct[i];f++)
{
for(int j=;j<(<<);j++)
{
for(int t=;t<k;t++)
{
if(!(sit[bag[i][f]]&j)&&!used[bag[i][f]]&&bag[i][f]<=n)
{
dp[now][j|sit[bag[i][f]]][t+]+=dp[past][j][t];
dp[now][j|sit[bag[i][f]]][t+]%=mode;
}
}
}
}
swap(now,past);
}
ll ans=;
for(int i=;i<(<<);i++)
{
for(int j=;j<=k;j++)
{
ans+=dp[past][i][j];
ans%=mode;
}
}
printf("%lld\n",ans%mode);
}
return ;
}