NOIP2014普级组第二题 比例简化

解题思路： 先读入数据，然后用双重循环从 1 到 L 枚举，如果 i 和 j 互质，且 i/j 的值大于 A/B 的值，那么就判断 i/j-A/B 是否小于 min ，如果小于，那么就把当前的 i 和 j 储存起来，并更新 min ，最后输出储存下来的 i 和 j 即可。

程序：

var

  a,b,l,i,j,ansx,ansy:longint;

  ans,min:real;

function gcd(x,y:longint):longint;

  var

    i,z:longint;

  begin

    if x

      else z:=y;

    for i:=z downto 1 do

      if (x mod i=0) and (y mod i=0) then exit(i);

end;

begin

  //assign(input,'ratio.in');reset(input);

  //assign(output,'ratio.out');rewrite(output);

  readln(a,b,l);

  min:=100000000;

  for i:=1 to l do

    for j:=1 to l do

      if (gcd(i,j)=1) and (i/j>=a/b) then

        if i/j-a/b

  writeln(ansx,' ',ansy);

  //close(input);close(output);

end.

版权属于: Chris

原文地址:  http://blog.sina.com.cn/s/blog_83ac6af80102v7wo.html

转载时必须以链接形式注明原始出处及本声明。