1) var mas:array[1..10] of Integer;
i:integer;
begin
i := mas[1];
mas[1] := mas[6];
mas[6] := i;
<span>end.
Вот как то так
</span>
<em>// PascalABC.NET 3.3, сборка 1634 от 14.02.2018</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Writeln('*** Исходная матрица ***');
var a:=MatrRandom(4,3,-10,10);
a.Println(4); Writeln(4*a.ColCount*'-');
var s:=a.ElementsByRow;
Writeln('min=',s.Min,', max=',s.Max)
end.
<u>Пример</u>
*** Исходная матрица ***
-10 -10 -9
-8 -2 -2
-1 -2 -5
-6 6 -5
------------
min=-10, max=6
Ответ:
400 бит
Объяснение:
l=K*i
K=80
i=5 (т.к. 2 в степени 5 это 32, а 32 в свою очередь мощность алфавита)
l=80*5=400бит
Устройсвом для подключения компьютера к сети является монитор и мышь