matlab。。。。

matlab编程。
编写一个程序,用于求任意两个正整数的最大公约数和最小公倍数

%此函数计算最大公约数,辗转相除法
function c=MAXGYS(a,b)
p=1;
while(p~=0)    
    p=MOD(a,b);
    a=b;
    b=p;
end
c=a;
end

%此函数计算余数
function p=MOD(a,b)
if(a<b)
    p=a;
else
    i=1;
    while((a-i*b)>=0)
        i=i+1;
    end
    p=a-(i-1)*b;
end
end
%此主程序用于调用最大公约数程序
clc;clear all
a=200;b=234;
c=MAXGYS(a,b);     %求最大公约数
fprintf('%d%d的最大公约数是:%d\n',a,b,c)
fprintf('%d%d的最小公倍数是:%d\n',a,b,a*b/c)