Даны массивы X(x1, x2, ..., x10) и Y(y1, y2, ..., y10 На место массива Х записать массив Y, а на место массива Y – массив Х.

var i,tmp: integer;

var X,Y: array [1..20] of integer;

begin

// Заполним массивы и выводим их на экран

writeln('Исходные массивы');

writeln('X':5,'Y':5);

randomize;

For i:= 1 to 20 do

begin

X[i]:=random(201)-100;

Y[i]:=random(201)-100;

writeln(X[i]:5,Y[i]:5);

end;

// Меняем местами

For i:= 1 to 20 do

begin

tmp := X[i];

X[i] := Y[i];

Y[i] := tmp;

end;

// Выводим на экран результат

writeln('Результат:');

writeln('X':5,'Y':5);

For i:= 1 to 20 do

begin

writeln(X[i]:5,Y[i]:5);

end;

end.

Найдем количество бит на символ при формулы:
N = 2^i, где:
N - алфавит.
I - количество бит на символ.

26 = 2^i.
I = 5 бит (не можем взять 4 бита, так как 16 < 24, не хватит).

Найдем объем пароля:
V = K * I, где:
V - объем.
K - размер пароля.

V = 10 * 5 = 50 бит.

Так как ответ нужно дать в байтах, переведем биты в байты:

50/8 = 7 байт (6 байт взять не можем, так как 48 < 50).

Найдем сколько всего памяти отводится на одного человека:

500 / 10 = 50 байт.

Из этих 50 байт, 7 байт отводится на пароль. Значит на дополнительные сведения:
50 - 7 = 43 байта.

ответ: 43 байта.

int RowWithMax(double m[n][n], int j)

{

   double max_el = m[j][j];

   int max_i = j;

   for (int i = j; i < n; i++)

   {

       if (abs(m[i][j]) > abs(max_el))

       {

           max_el = m[i][j];

           max_i = i;

       }

   }

   return max_i;

}

 

void RowChange(double m[n][n], double f[n], int i1, int i2)

{

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

   {

       /*m[i1][j] = m[i1][j] + m[i2][j];

       m[i2][j] = m[i1][j] - m[i2][j];

       m[i1][j] = m[i1][j] - m[i2][j];*/

       swap(m[i1][j], m[i2][j]);

   }

   

   swap(f[i1], f[i2]);

}

 

double StraightRun(double m[n][n], double f[n], int i) //прямой метод

{

   double el;

   double det = 1;

   int reverse = 0;

 

   int max_i = RowWithMax(m, i);

   if (i != max_i)

   {

       RowChange(m, f, i, max_i);

       //reverse++;

       det *= (-1);

   }

   el = m[i][i];

   det *= el;

   f[i] /= el;

   for (int i1 = n - 1; i1 >= i; i1--)

   {

       m[i][i1] /= el;

   }

   for (int i2 = i + 1; i2 < n; i2++)

   {

       el = m[i2][i];

       f[i2] -= f[i] * el;

       for (int j = n - 1; j >= i; j--)

       {

           m[i2][j] -= el * m[i][j];

       }

   }

 

 

   return det/**pow(-1, reverse)*/;

 

}