//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
var m:=ReadlnInteger();
var a:=matrixRandom(m,m,-20,20);
Println(a);
var p:=1;
for var i:=0 to m-1 do
for var j:=0 to m-1 do
if a[i,j]>0 then p:=p*a[i,j];
println(p);
end.
В восьмеричной сс максимальная возможная цифра - 7.
5423,4321,1000,6007 <span>МОЖНО ОТНЕСТИ К ВОСЬМЕРИЧНОЙ СС.</span>
Арифметика. Надо узнать объем информации в битах и разделить на скорость модема:
258*1024*8/128000 = 16.512≈16.5 сек
Ответ: ≈16.5 сек