PASCAL试题〔例2〕用尼考曼彻斯法求两个自然数a和b的最大公约数.方法是：辗转相减.如要求158与36的最大公约数,

来源：学生作业帮编辑：大师作文网作业帮分类：综合作业时间：2024/11/19 17:54:31

PASCAL试题
〔例2〕用尼考曼彻斯法求两个自然数a和b的最大公约数.
方法是：辗转相减.如要求158与36的最大公约数,可以进一步转化为158-36=122与36的最大公约数,继续减,如果不够减就交换两个数,直至差为0停止,最后一次不为0的数就是最大公约数.过程如下：
(158,36)=(122,36)=(86,36)=(50,36)=(14,36)
前面的数比后面小,交换:=(36,14)=(22,14)=(8,14)
再交换: =(14,8)=(6,8)=(8,6)=(2,6)=(6,2)=(4,2)=(2,2)=(0,2)

var a,b,temp:integer;
begin
readln(a,b);
if ab) then a:=a-b
else begin temp:=a-b; a:=b;b:=temp; end;
end;
if a=0 then writeln(b) else writeln(a);
end.

PASCAL试题〔例2〕用尼考曼彻斯法求两个自然数a和b的最大公约数.方法是：辗转相减.如要求158与36的最大公约数, 计算两个正整数的最大公约数和最小公倍数.要求计算最大公约数使用辗转相除法 vb用辗转相除法求两个自然数m,n的最大公约数和最小公倍数的程序代码如下,请完善之用辗转相除法求两个自然数m,n的最大公约数和最小公倍数的vb程序编写求两个自然数,其和是667,最小公倍数与最大公约数之比是120:1(pascal) 输入两个正整数m和n,求它们的最大公约数和最小公倍数（本题要求用辗转相除法实现） pascal语言求n个自然数的最大公约数和最小公倍数定义函数 int func（int a,int b）; func功能为：使用辗转相除法求a和b的最大公约数,并返回.要求 a与b是相邻的两个自然数，则a、b的最大公约数与最小公倍数之和等于______．定义运算“@”如下：对于两个自然数a和 b,它们的最大公约数与最小公倍数的差计为a@b.如10@1 自然数a除以自然数b商是6,a和b的最大公约数是()最小公倍数是() 求最大公约数与最小公倍数的辗转相除法的证明..