function [a,b]=numeriprimi_2(n)

%-------------------------------------------------------------------------
% Oggetto:
%
% 1. Ricerca dei numeri primi nell'intervallo che va da "2" a "n", con "n" 
% numero intero maggiore di 2. 
% I numeri primi sono immagazzinati in "a" mentre "b" e' pari al tempo
% di calcolo che e' stato necessario per eseguire la routine.
%
% 2. La funzione ricerca eventuali divisori di "i" nell'intervallo da 2 a 
% radice quadrata di "i", per ogni numero "i" con valori interi tra 2 a "n". 
%--------------------------------------------------------------------------

a=[];
tic
for i=2:n
    q=floor(sqrt(i));
    flag=0;
    for j=2:q
        if rem(i,j)==0
            flag=1;
            if flag==1
                break;
            end
        end
    end
    if flag==0
        a=[a;i];
    end
end
b=toc;
end
