Упорядкуйте одиниці довжини двійкового коду за зростанням.

-біт
-байт
-мегабайт
-кілобайт

PascalABC.NET 3.3.5, сборка 1650 от 01.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var m:=ReadInteger('Количество строк/столбцов в матрице:');
  Writeln('*** Исходная матрица ***');
  var b:=MatrRandom(m,m,-99,99);
  b.Println(4); Writeln(4*m*'-');
  var (s,s1):=(Sqr(b[0,0]),0);
  for var i:=0 to m-1 do
    for var j:=0 to m-1 do
      if i+j<>0 then s1+=b[i,j];
  s-=Sqr(s1);
  Writeln('Результат: ',s)
end.

Пример
Количество строк/столбцов в матрице: 5
*** Исходная матрица ***
  48 -33   4 -66  28
  91 -46  58  11  92
  37 -42   8 -12  39
  25  65  91 -30  83
 -31 -53  36  28  49

Результат: -184320

1) Вычислим ско­рость пе­ре­да­чи дан­ных по каналу:
1 минута = 60 секунд.
4000 Кбайт / 60 сек * 45 сек = 3000 Кбайт.
ответ: 3000 кбайт

2) 2 минуты = 120 секунд
5000 кбайт / 120 сек * 48 сек = 2000 кбайт

3)Переведем все в байты для удобства
4 кбайт = 4096 байт
1024 бита\сек  = 128 байт\сек
4096 / 128  = 32 секунды, это время передачи первого файла

256\8 = 32 байт\сек, переводим бит в байт
32*32 = 1024 байт, размер файла который можно передать за то же время, но со скоростью 256 бит в секунду
ответ: 1024 байт.