
function demo_divisore

%--------------------------------------------------------------------------
% OGGETTO:
%--------------------------------------------------------------------------
% Demo della routine "divisore".
%--------------------------------------------------------------------------

v=1:2:11;
w=v.^4;
L=length(w);

for k=1:L
    n=w(k);
    [divs,flag]=divisore(n);
    numero_divisori=length(divs);
    fprintf('\n \t n: %5.0f divisori: %5.0f',n,length(divs));
    fprintf('\n \n'); disp(divs')
end

fprintf('\n');

%--------------------------------------------------------------------------
% RISULTATI:
%--------------------------------------------------------------------------
% 
%  >> demo_divisore
% 
%  	 n:     1 divisori:     2
%  
%      1
%      1
% 
% 
%  	 n:    81 divisori:     5
%  
%      1
%      3
%      9
%     27
%     81
% 
% 
%  	 n:   625 divisori:     5
%  
%      1
%      5
%     25
%    125
%    625
% 
% 
%  	 n:  2401 divisori:     5
%  
%            1
%            7
%           49
%          343
%         2401
% 
% 
%  	 n:  6561 divisori:     9
%  
%            1
%            3
%            9
%           27
%           81
%          243
%          729
%         2187
%         6561
% 
% 
%  	 n: 14641 divisori:     5
%  
%            1
%           11
%          121
%         1331
%        14641
% 
%--------------------------------------------------------------------------


