Code666 (代码贴、代码片段)

[Delphi (Object Pascal)] Delphi用递归方法计算两个数的最大公约数 →→→→→进入此内容的聊天室

来自 , 2020-01-01, 写在 Delphi (Object Pascal), 查看 106 次.
URL http://www.code666.cn/view/f7ae58c7
  1. function GCD2(const A, B: Integer): Integer;
  2. begin
  3.   if B = 0 then
  4.     Result := Abs(A)
  5.   else
  6.     Result := GCD2(B, A mod B);
  7. end;

回复 "Delphi用递归方法计算两个数的最大公约数"

这儿你可以回复上面这条便签

captcha

贴代码片段 - Code666