`% GCD OF list of Nos using Eucledian Alogorithm function GCD= GCD(n); x=1; p=n; while(size(n,2))>=2 p= n(:,size(n,2)-1:size(n,2)); n=n(1,1:size(n,2)-2); x=1; while(x~=0) x= max(p)-min(p); p = [x,min(p)]; end n=[n,max(p)]; p= []; end '
user11948
source share