Сортировать вторую половину по убыванию массив паскаль

Const n=10;
var a:array[1..10] of integer;
i,j,z:integer;
begin
writeln('Исходный массив: ');
for i:=1 to n do begin
a[i]:=random(100);
write(a[i]:4);
end;
writeln;
for i:=6 to 9 do
for j:=i+1 to 10 do
if a[i]<a[j] then
begin
z:=a[i];
a[i]:=a[j];
a[j]:=z;
end;
Write('Результат: ');
for i:=1 to 10 do
Write(a[i]:4);
end.

Дано:
Разрешающая сканера 600 х 600 dpi.
Размер 10см x 15см.
Глубина цвета - 3 байта.

Найти:
Каков информационный объём этого файла?

Решение:
Вначале переводим глубину цвета из байт в биты
3 байта * 8бит в байте = 24 бит

Вычисляем разрешение сканера в 1 дюйме квадрат
600*600 = 360 000 пикселей в 1 дюйм^2

Переводим размер картинки из квадратных сантиметров в квадратные дюймы.
10см = 3.937дюйма
15см = 5,906дюйма
10*15=150 см^2 = 3,937 * 5,906 = 23,25 дюйм^2

Вычисляем количество пикселей в изображении
23,25 дюйм^2 * 360 000 пикселей в 1 дюйм^2 = 8 370 000 пикселей

Информационный объём вычисляем по формуле
количество пикселей * глубину цвета =
8 370 000 пикселей * 24 бит = 200 880 000 бит.

Переводим в байты делением на 8.
25 110 000 байт
или же делим на 1024*1024 чтобы получить количество мегабайт
23,95 Мегабайт

ответ:
Информационный объём отсканированного изображения =
25 110 000 байт или 23,95 Мегабайт

Дано:
Разрешающая сканера 600 х 600 dpi.
Размер 10см x 15см.
Глубина цвета - 3 байта.

Найти:
Каков информационный объём этого файла?

Решение:
Вначале переводим глубину цвета из байт в биты
3 байта * 8бит в байте = 24 бит

Вычисляем разрешение сканера в 1 дюйме квадрат
600*600 = 360 000 пикселей в 1 дюйм^2

Переводим размер картинки из квадратных сантиметров в квадратные дюймы.
10см = 3.937дюйма
15см = 5,906дюйма
10*15=150 см^2 = 3,937 * 5,906 = 23,25 дюйм^2

Вычисляем количество пикселей в изображении
23,25 дюйм^2 * 360 000 пикселей в 1 дюйм^2 = 8 370 000 пикселей

Информационный объём вычисляем по формуле
количество пикселей * глубину цвета =
8 370 000 пикселей * 24 бит = 200 880 000 бит.

Переводим в байты делением на 8.
25 110 000 байт
или же делим на 1024*1024 чтобы получить количество мегабайт
23,95 Мегабайт

ответ:
Информационный объём отсканированного изображения =
25 110 000 байт или 23,95 Мегабайт