Ответ:
var
A: array [1..10] of integer;
i : integer;
temp : integer;
begin
Randomize;
for i := 1 to 10 do
begin
A[i] := random(30);
Write(A[i], ' ');
end;
Writeln;
i := 1;
while i < 10 do
begin
temp := A[i];
A[i] := A[i + 1];
A[i + 1] := temp;
inc(i, 2);
end;
Writeln('Новый массив: ');
for i := 1 to 10 do Write(A[i], ' ');
end.
Объяснение:
Прокладка кабелей, установка оборудования
1 символ - 1 байт, следовательно 164 х 128 х 256=5 373 952 байт = 5 248 КБ = 5.125 мб= 0.00501 гб, далее 160гб /0.00501гб=31 937 книг
1. V= 5*3*4=60 бит
2. V= 20*15*3=900 бит * 2 = 1800 бит