% Implementare algoritmo che preso un vettore v,
% calcoli il massimo comun divisore (MCD)
% fra tutti gli elementi di v, utilizzando una
% tecnica ricorsiva

% Richiedere in ingresso il vettore (di interi)

% Ipotesi: gli elementi del vettore sono >1
% Se v(1)==v(2): mcd=v(1);
% Se v(1)>v(2):  v(1)-v(2): mcd(v(2),v(1)-v(2))

clear
v=input('Inserisci il vettore da analizzare: \n') ;

% Ipotesi: n>1
n=length(v) ;
if n==1
    r=v ;
    disp(['MCD= ' num2str(r)])
end
r=mcd(v(1),v(2)) ;

if n>2
    for i=3:n
        r=mcd(r,v(i)) ;
    end
    disp(['MCD= ', num2str(r)])
end
    
