利用递归求最大公约数 Pascal
varm,n,a:longint;functiongys(a,b:longint):longint;beginifb=0thengys:=aelsegys:=gys(b,...
var
m,n,a:longint;
function
gys(a,b:longint):longint;
begin
if b=0 then
gys:=a
else
gys:=gys(b,a mod b);
end;
begin
readln(m,n);
writeln(gys(m,n));
end.
请问“gys:=gys(b,a mod b);”是什么意思 展开
m,n,a:longint;
function
gys(a,b:longint):longint;
begin
if b=0 then
gys:=a
else
gys:=gys(b,a mod b);
end;
begin
readln(m,n);
writeln(gys(m,n));
end.
请问“gys:=gys(b,a mod b);”是什么意思 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询