如果发现广告等破坏行为，请尽量将条目恢复到较早的版本而不是把相应内容直接删除，谢谢合作。

URAL/1053

来自"NOCOW"

跳转到: 导航, 搜索

gcd，由题意发现是更相减损法求最大公约数，那么用辗转相处法就可以解决了。 var x,y,i,n:longint; 

function gcd(x,y:longint):longint;
begin
  if y=0 then exit(x);
  exit(gcd(y, x mod y));
end;
 
begin
  readln(n);
  read(x);
  for i:=1 to n-1 do
  begin
   read(y);
   if x>y then 
     x:=gcd(x,y) else x:=gcd(y,x);
  end;
  writeln(x);
end.
 
 
from 3144046cjc

3144046cjc

来自"http://www.nocow.cn/index.php/URAL/1053"
个人工具