Я уж не силен в этой программе
но вот вроде должно получиться<span>
</span><span>var
a, b : array [1..16] of Integer;
begin
for var i := 1 to 16 do
a[i] := ReadLnInteger('a[' + i + '] =');
WriteLn('Массив A = ', a);
b := a;
Swap(b[2], b[5]);
Swap(b[4], b[9]);
Swap(b[7], b[15]);
Swap(b[9], b[16]); // повторяем обмен 9, если что?
WriteLn('Массив B = ', b);
end.</span>
<u><em>Информационные модели</em></u>-описания объекта-оригинала на языках кодирования информации.
Например:схема и чертеж.
Я думаю, что так.Надеюсь, что помогла:з
650 ПЕРЕВЕСТИ В КБ И ДЕЛИТЬ НА 3072
650x1024=665600
665600/3072=216,6сек
216,6/60=3,61мин
Пример в Excel. лист защищен без пароля, чтобы не испортить формулы. Программа работает от 0 до 255 числа. Для перевода достаточно разделить, отбросив дробную часть и затем выписать результат в обратном порядке.
<span>процессы, как устроен компьютер, системы, объекты, программы компьютера.</span>