Дан массив чисел: 45, 22, 38, 57, 30, 41, 83, 12, 17, 25, 7, 16 выполнить сортировку методом шейкерной сортировки. описать последовательность действий. выполнить подсчет сравнений.

#include < iostream> #include < iomanip> #include < cstdlib> using namespace std; int main() {   bool priz;   int n;   cout< < "n = ";   cin> > n;   int *a = new int[n];   srand(time(null));   for (int i=0; i< n; i++) {       a[i]=rand()%101-50;       cout< < a[i]< < " ";       if (a[i]< 0) a[i]  =  -  a[i];   }   cout< < endl; //   сортировка массива     while (priz)         {       priz=false;       for (int i=1; i< n; i++)       if (a[i]< a[i-1])            {   swap(a[i],a[i-1]);   priz=true;   }     } // вывод массива     cout< < "new array"< < endl;       for (int i=0; i< n; i++)       cout< < a[i]< < " ";     cout< < endl;     system("pause");     return 0; }

// pascalabc.net 3.3, сборка 1590 от 03.12.2017 // внимание! если программа не работает, обновите версию! begin   var n: =readinteger('n=');   writeln(range(0,n-1).select(i-> 1/(i.iseven? 4*i+1: -(4*i+) end. пример n= 13 0.876761945581588 для pascal abc (проверить негде, проект закрыт в 2004 году) var   i,n,z: integer;   x,s: real; begin   write('n='); read(n);   s: =0; z: =1;   for i: =0 to n-1 do begin       x: =1/(4*i+1);       s: =s+x*z;       z: =-z       end;   writeln(s) end.