[Delphi (Object Pascal)] pascal经典算法 - 求最大公约数 →→→→→进入此内容的聊天室

来自 , 2020-12-24, 写在 Delphi (Object Pascal), 查看 100 次.
URL http://www.code666.cn/view/751f6b6b
  1. function gcd(a, b: Integer): Integer;
  2. begin
  3.   if b = 0 then
  4.     gcd := a
  5.   else
  6.     gcd := gcd(b, a mod b);
  7. end;

回复 "pascal经典算法 - 求最大公约数"

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

captcha