Який вчинок повпливав на долю Гордія Кулаківського «Русалонька із 7-в»

// PascalABC.NET 3.2, сборка 1383 от 09.02.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('Количество строк в массиве:');
  var m:=ReadInteger('Количество столбцов в массиве:');
  Writeln('*** Исходный массив [',n,',',m,'] ***');
  var a:=MatrRandom(n,m,-99,99);
  a.Println(5); Writeln(5*a.ColCount*'-');
  Writeln('Сумма элементов массива: ',
      a.Rows.SelectMany(x->x).Sum)
end.

Пример
Количество строк в массиве: 6
Количество столбцов в массиве: 9
*** Исходный массив [6,9] ***
   39   99   51   44  -28  -85  -52  -98  -56
   68   41    3   34   54  -39  -72   15  -80
   47  -11   35  -50   65   70   58   52   -1
   38   82  -37   93   32   51  -82  -32   98
  -72  -12   59   87   44   -4  -14  -56   13
   44   72    1   63   48  -77    4  -28   73

Сумма элементов массива: 691

Бит | Байт | Кбайт | Мбайт

24576 | 3072 | 3 | 0,003

16384 | 2048 | 2 | 0,002

12288 | 1536 | 1,5 Кбайт | 0,001

67108,864 | 8388,608 | 8,192 | 0,008

Объяснение:

1 байт = 8 бит

1 Кбайт = 1024 байт

1 Мбайт = 1024 Кбайт

24576 бит = 24576 / 8 = 3072 байт = 3072 / 1024 = 3 Кбайт = 3 / 1024 ≈ 0,003 Мбайт

2048 байт = 2048 / 1024 = 2 Кбайт = 2 / 1024 ≈ 0,002 Мбайт

2048 байт = 2048 * 8 = 16384 бит

1,5 Кбайт = 1,5 / 1024 ≈ 0,001 Мбайт

1,5 Кбайт = 1,5 * 1024 = 1536 байт = 1536 * 8 = 12288 бит

0,008 Мбайт = 0,008 * 1024 = 8,192 Кбайт = 8,192 * 1024 = 8388,608 байт = 8388,608 * 8 = 67108,864 бит