题目:
题目描述
输入一个自然数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..160)
输出格式:
每个分数单独占一行,按照大小次序排列
作者思路:这种方法不用排序方式,先让分母最大,分子最小,后输出大的。
代码:
var n:longint;
procedure dfs(x1,y1,x2,y2:longint);
var x,y:longint;
begin
x:=x1+x2; y:=y1+y2;
if y>n then exit;
dfs(x1,y1,x,y);
writeln(x,'/',y);
dfs(x,y,x2,y2);
end;
begin
read(n);
writeln('0/1');
dfs(0,1,1,1);
write('1/1');
end.