Адабиётлар

5.1 Топилган элементни рўйхат бошига қўйиш орқали жадвални қайта 
тартиблаш
Мазкур усулни мағзи шундан иборатки, берилган калитга тенг 
калитли элемент рўйхатда биринчи элемент деб ўзлаштирилади, 
қолганлари эса сурилади.
Келтирилган алгоритм рўйхат учун ҳам массив учун хам ўринли. Бироқ 
бу алгоритм массив учун тавсия қилинмайди, сабаби элементларни 
ўринлаштиришга кўрсаткичларни ўринлаштиришдан кўра анча кўп вақт 
талаб қилади. 
Рўйхатни қайта тартиблаш алгоритми: 
Паскаль: 

---

―Маълумотлар тузилмаси ва алгоритмлар‖ фанидан маърузалар матни.
муаллиф: Б.Б.Акбаралиев 
q:=nil; 
p:=table; 
while (p <> nil) do 
begin 
if key = p^.k then 
begin 
if q = nil 
then 'ўринлаштириш шарт эмас' 
search := p; 
exit; 
end; 
q^.nxt := p^.nxt; 
p^.nxt := table; 
table := p; 
exit; 
end; 
q := p; 
p := p^.nxt; 
end; 
search := nil; 
exit; 
 
Транспозиция усули
Ушбу усулда топилган элемент рўхатда битта олдинги элемент билан 
ўрин алмаштирилади. Агарда мазкур элементга кўп мурожаат қилинса, 
биттадан олдинга сурилиб бориб натижада рўйхат бошида бўлади. 
Чизма. Қўшни элементларни ўрнини алмаштириш 
 
р – ишчи кўрсаткич 
q – ѐрдамчи кўрсаткич, р дан битта қадам орқада бўлади 
s - ѐрдамчи кўрсаткич, q дан иккита қадам орқада бўлади
Транспозиция усули алгоритми: 
Паскаль: 
s:=nil; 
q:=nil; 
p:=table; 
while (p <> nil) do 

---

―Маълумотлар тузилмаси ва алгоритмлар‖ фанидан маърузалар матни.
муаллиф: Б.Б.Акбаралиев 
begin 
if key = p^.k then 
‗транспонерлаймиз 
begin
if q = nil then 
begin 
‗ўринлаштирилмайди
search:=p; 
exit; 
end; 
q^.nxt:=p^.nxt; 
p^.nxt:=q; 
if s = nil then 
table := p; 
else
begin 
s^.nxt := p; 
end; 
search:=p; 
exit; 
end; end; 
search:=nil; exit; 
Ушбу усул нафақат рўйхатда, балки массивда хам қулай (сабаби 
фақатгина иккита ѐнма-ѐн турган элемент ўрин алмаштирилади).