Изменения

Shakersort:

'''for''' (int i = 0; i < n/2; i++)

beg = 0;

end = n - 1;

'''while''' beg<=end do

'''if''' a[beg] >a[beg + 1]

Swap(a[beg],a[beg+1]);