解的个数
(count)
给定一个正整数
K
,问有多少和正整?/p>
X,Y
满足
X>=Y
?/p>
1/K=1/X+1/Y
,
将所?/p>
解按
X
降序输出?/p>
输入
第一行一个数
T
,表示数据组?/p>
以下
T
行,每行一个数
K
输出
T
部分,每部分第一行一个数
K
,以下一次按
X
降序输出所有解,个数见样例?/p>
注意
=+
两边都有空格?/p>
样例输入
2
2
12
样例输出
2
1/2 = 1/6 + 1/3
1/2 = 1/4 + 1/4
8
1/12 = 1/156 + 1/13
1/12 = 1/84 + 1/14
1/12 = 1/60 + 1/15
1/12 = 1/48 + 1/16
1/12 = 1/36 + 1/18
1/12 = 1/30 + 1/20
1/12 = 1/28 + 1/21
1/12 = 1/24 + 1/24
数据规模
30%
K<=20
100%
K<=10000,T<=10
标程?/p>
var t,i,j,l,n,k:integer;
a:array[1..20] of integer;
b,c:array[1..10000] of longint;
procedure shou(n:integer);