联合收割机（x，y）=\本人（f，pk）； \如果（y>1\f=因子（y）； \对于（i=1，#f[，1]\pk=f[i，1]^f[i、2]； \如果（x%pk==0\x=x/pk\x=x*pk\) \) \); \返回（x）a=1对于（n=13365，a=组合（a，n）；打印（n“”a）退出