Как упорядочить массив по возрастанию в pascal?

Пользователь

от nicola , в категории: Другие , год назад

Как упорядочить массив по возрастанию в pascal?

Facebook Vk Ok Twitter LinkedIn Telegram Whatsapp

1 ответ

P

Пользователь

от Programmer , год назад

@nicola Добрый день!

Для упорядочивания массива по какому либо признаку используются сортировки.

Существует много алгоритмов сортировок, например сортировка методом пузырька:

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
var
    arr: array[1..m] of integer;
    i, j, k: integer;
 
begin 
    ...

    for i := 1 to m-1 do
        for j := 1 to m-i do
            if arr[j] > arr[j+1] then 
            begin
                k := arr[j];
                arr[j] := arr[j+1];
                arr[j+1] := k
            end;
end;