Const n=10;
var a:array[1..n] of integer;
i:integer;
begin
Randomize;
writeln('Массив A:');
for i:=1 to n do
begin
a[i]:=random(51);
write(a[i]:4);
end;
writeln;
for i:=1 to n div 2 do write(a[i]:4, a[n-i+1]:4);
writeln;
end.
Пример:
<span>Массив A:
12 44 36 9 1 13 10 11 37 30
12 30 44 37 36 11 9 10 1 13</span>
Архивация — подготовительная обработка (сбор, классификация, каталогизация, сжатие (для цифровой информации)) данных для долгосрочного хранения или передачи их по сети
Это возможность служит для облегчения работы с файлами