两个数的最大公约数代码,Delphi代码库,德仔网

代码语言

代码分类

【Delphi】两个数的最大公约数

作者:jellyvice / 发布于2013/12/3/ 1062

function GCD(A, B: Integer): Integer;
var
 Temp: Integer; // used in swapping A & B
begin
 while B <> 0 do
 begin
  Temp := B;
  B := A mod Temp;
  A := Temp;
 end;
 Result := A;
end;

评论列表

本站所提供的代码，版权归原作者所有，若有侵犯作者版权，请与我们联系，我们将立即删除或修改。谢谢!
本站所有代码发布及提供者。

　　

试试其它关键字

　公约数　

同语言下

可能有用的

jellyvice贡献的其它代码(28)