3. 韩信点兵又称为中国剩余定理:相传汉高祖刘邦问大将军韩信统御兵士多少,韩信答说,每3人一列余1人、5人一列余2人、7人一列余4人、13人一列余6人……。刘邦茫然而不知其数。

program exExhaustive3_1;
const Maxnum = 100;
var
     remainder3, remainder5, remainder7, num : integer;
begin
     write('Please input 3 remainders (by 3, 5, 7): ');
     readln(remainder3, remainder5, remainder7);
     num := remainder7;
     while num <= Maxnum do
     begin
          if (num mod 3 = remainder3) and (num mod 5 = remainder5) then writeln('The number maybe is ', num);
          num := num+7;
     end;
     readln;
end.
posted @ 2010-01-01 21:03  SmartIOI  阅读(1767)  评论(0)    收藏  举报
本站采用CC授权如需转载、引用文章,请务必附上作者及来源处。 Creative Commons License