clear all;

clc;

store=[];

isprime=1;

count=1;

for i=2:1:100

for j=2:1:i-1

if mod(i,j)==0

isprime=0;

end

end

if isprime~=0

store(count)=i;

count=count+1;

end

isprime=1;

end