Изменения
→Разбиение массива
while true
do repeat j = j - 1
until A[j] <tex>\leq </tex> x
repeat i = i + 1
until A[i] > x
</wikitex>
==Оптимизация глубины рекурсии до O(logn) в худшем случае==
