var x,y:longint;
begin
x:=2014; y:=924;
while (x<>0) and (y<>0) do
begin
if x>=y then x:=x-y else y:=y-x
end;
if x=0 then writeln(y) else writeln(x)
end.

输出：2