题目描述
输入二个正整数x0,y0(2<=x0<100000,2<=y0<=1000000),求出满足下列条件的P,Q的个数
条件:
1.P,Q是正整数
2.要求P,Q以x0为最大公约数,以y0为最小公倍数.
试求:满足条件的所有可能的两个正整数的个数.
输入输出格式
输入格式:
二个正整数x0,y0
输出格式:
一个数,表示求出满足条件的P,Q的个数
输入输出样例
输入样例#1:
3 60
输出样例#1:
4
说明
P,Q有4种
3 60 15 12 12 15 60 3
没什么好讲的,直接模拟。
代码如下:
var i,j,n,m,s:longint;
function xx(n,m:longint):longint;
begin
if n mod m<>0 then xx:=xx(m,n mod m)
else xx:=m;
end;
begin
readln(n,m);
s:=0;
for i:=n to m do
if i mod n=0 then
for j:=n to m do
if j mod n=0 then
if (xx(i,j)=n)and (i*j div n=m)then inc(s);
writeln(s);
end.