clear
kmin=1;
kmaks=10;
for k=kmin:kmaks
   home
   k
   x(k)=k*2;
   pause(1)
end %for