function [vekt]=optimum_olmayan_siralama(vekt) %eger secilen deere esit degerler varsa

l_v=length(vekt); %vektorun boyutunu verir
 
%secilen_sayinin_yeri=unidrnd(l_v) %vektorde secilen sayınin index degerini verir


%vektordeki her degerin vektorde secilen degere uzaklıgı bulundu

%sıralama yapılarak bu is cozumlenebilir
for j=1:l_v-1
    j
for i=1:l_v-1,
    i
   if vekt(i)>vekt(i+1) % bu durumda yer degistirme yapılacak
     
     
     degisen_vekt=vekt(i);
     vekt(i)=vekt(i+1);
     vekt(i+1)=degisen_vekt;
     % bu yer degistirmeler sonucunda en uzak olan en saga gidecektir
     
   else 
       %bu durumda degistirmeye gerek yok demektir
   end
end
end