Сколько входных параметров имеет подпрограмма, которая взаимодействует с основной лишь через глобальные параметры?

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

begin
  var n:=5;
  Writeln('*** Исходная матрица ***');
  var a:=MatrRandom(n,n,-50,50);
  a.Println(4); Writeln(4*a.ColCount*'-');
  var (k,p):=ReadInteger2('Введите через пробел номера двух строк:');
  if k.Between(1,n) and p.Between(1,n) then begin
    a.Row(k-1).Zip(a.Row(p-1),(x,y)->x*y).Println;
    end
end.

Пример
*** Исходная матрица ***
 -45 -38 -15  34 -13
   1 -38  39  34 -25
  24 -41  -4 -25 -48
   5 -19 -43 -15 -31
 -21  27 -31  23 -39

Введите через пробел номера двух строк: 2 5
-21 -1026 -1209 782 975

1. Определяем, какой объем займет 1с закодированного файла
Частота дискретизации 44.1 кГц означает, что будет использоваться 44100 отсчетов. 16-битное кодирование означает, что на каждом отсчете уровень сигнала кодируется в 16 бит = 16/8 = 2 байта.
Тогда 1с кодированного звука потребует для хранения 44100×2 = 88200 байт.
2. Определяем объем файла
10с звука займут 10×88200 байт = 882000 байт. Это на один канал звука, но поскольку файл монофонический, в нем как раз один канал.
Можно воспользоваться более крупными единицами.
1 Кбайт = 1024 байта, тогда 882000 байт = 882000/1024 ≈ 861.3 Кбайт

ответ: 882 000 байт ≈ 861.3 Кбайт