Изменения

'''if''' (r - l <tex> \leqslant </tex> M)

insertion(a, l, r)

'''int''' med = median(a[l], a[(l + r) / 2], a[r])

swap(a[med], a[(l + r) / 2])