Задан массив x[1..n]. определите число операций умножения, которые выполняются при работе этой программы:
s: =x[1]*x[n];
for k: =1 to n do begin
x[k]: =2*x[k]+s;
for i: =1 to 3 do
s: =s*2;
end;
ответ плес

#include <iostream>

#include <time.h>

using namespace std;

int main()

{

srand(time(0));

int a, b;

int min = 100, posI, posJ;

cin >> a >> b;

int** matrix = new int*[a];

for (int i = 0; i < a; i++)

 matrix[i] = new int[b];

for (int i = 0; i < a; i++)

{

 for (int j = 0; j < b; j++)

  matrix[i][j] = rand() % min;

}

for (int i = 0; i < a; i++)

{

 for (int j = 0; j < b; j++)

  cout << matrix[i][j] << '\t';

 cout << endl;

}

for (int i = 0; i < a; i++)

{

 for (int j = 0; j < b; j++)

  if (matrix[i][j] < min)

  {

   posI = i;

   posJ = j;

   min = matrix[i][j];

  }

}

matrix[posI][posJ] = matrix[0][0];

matrix[0][0] = min;

cout << endl;

for (int i = 0; i < a; i++)

{

 for (int j = 0; j < b; j++)

  cout << matrix[i][j] << '\t';

 cout << endl;

}

for (int i = 0; i < a; i++)

 delete[] matrix[i];

delete[] matrix;

system("pause");

return 0;

}

begin   Randomize;   for i := 1 to n do     for j := 1 to n do       X[i,j] := Random(100);     for i := 1 to n do begin     IndMax := 1;     max :=X[i,1];     for j := 2 to n do begin       if X[i,j]>max then begin         max := X[i,j]; //Наибольший элемент строки с номером i         IndMax := j;  //Столбец, в котором находится наибольший элемент строки                            //с номером i       end;     end;   //Смена элементов     X[i,IndMax] := X[i,i];     X[i,i] := max;   end;   end;