clear 
clc 
kac=100; 
for i=1:1:kac 
arrayone(i)=floor(rand(1)*100)+1; 
end
for j=1:1:11 
arrayindex(j)=1; 
end
for i=1:1:kac 
arraytwo(floor(arrayone(i)/10)+1,arrayindex(floor(arrayone(i)/10)+1))=arrayone(i); 
arrayindex(floor(arrayone(i)/10+1))=arrayindex(floor(arrayone(i)/10)+1)+1; 
pause(0.3) 
clc 
arrayone 
arraytwo 
arrayindex 
end