问题描述
输入一个自然数N,对于一个最简分数a/b(分子和分母互质的分数),满足1<=b<=N,0<=a/b<=1,请找出所有满足条件的分数。
这有一个例子,当N=5时,所有解为:
0/1 1/5 1/4 1/3 2/5 1/2 3/5 2/3 3/4 4/5 1/1
给定一个自然数N,1<=n<=160,请编程按分数值递增的顺序输出所有解。
注:①0和任意自然数的最大公约数就是那个自然数②互质指最大公约数等于1的两个自然数。
输入格式
一个自然数N(1<=N<=160)
输出格式
每个分数单独占一行,按照大小次序排列
输入样例
5
输出样例
0/1
1/5
1/4
1/3
2/5
1/2
3/5
2/3
3/4
4/5
1/1
输入
输出
样例输入
样例输出
提示
N<=160
分析:凭借我高超的rp,我想到了递归,work(a,b,c,d)表示的是从a/b到c/d,递归的终止条件是分母大于n。利用了二分思想。
附代码(终于不用c++了!!!)
var
n:longint;
procedure work(a,b,c,d:longint);
var x,y:longint;
begin
x:=a+c;y:=b+d;
if y>n then exit;
work(a,b,x,y);
writeln(x,'/',y);
work(x,y,c,d);
end;
begin
readln(n);
writeln('0/1');
work(0,1,1,1);
writeln('1/1');
end.