Главная

Сортировка выбором

сб, 02/12/2011 - 20:20 — tech
Темы учебника
Массивы в Паскале. Одномерные массивы
Общее представление о массивах
Задача: 

Требуется отсортировать массив по возрастанию.

Алгоритм решения задачи: 

Для этого можно воспользоваться следующим алгоритмом.

  1. Найти максимальный элемент (max) в массиве (arr).
  2. Поместить его на последнее место (j).
  3. Элемент, находившийся в конце массива переместить на место, где прежде находился max.
  4. Уменьшить просматриваемую область массива на единицу (j – 1).
  5. Снова найти максимальный элемент в оставшейся области.
  6. Поместить его в конец просматриваемой области массива.
  7. и т.д.
Программа на языке Паскаль:  

const n = 10;
 
var
    arr: array[1..n] of byte;
    max, id_max, i, j: byte;
 
begin
    randomize;
    for i := 1 to n do begin
        arr[i] := random(256);
        write(arr[i]:4)
    end;
    writeln;
 
    j := n;
 
    while j > 1 do begin
        max := arr[1];
        id_max := 1;
        for i := 2 to j do
            if arr[i] > max then begin
                max := arr[i];
                id_max := i
            end;
        arr[id_max] := arr[j];
        arr[j] := max;
        j := j - 1
    end;
 
    for i := 1 to n do
        write(arr[i]:4);
 
readln
end.

Примечания: 

Присваивание длины массива переменной j не обязательно. Вместо j в цикле while можно было использовать само n. Однако в конце мы выводим на экран отсортированный массив, поэтому требуется сохранить исходное значение n.

  • Добавить комментарий

Комментарии

вс, 12/08/2013 - 18:58 — Гость

Дан массив слов (не меньше

Дан массив слов (не меньше 10), длина слова 4-10 символов. Заменить последние три символа слов, имеющих выбранную длину на символ "$". Результат- строка слов, разделённых пробелом.

  • ответить
Пнд, 12/09/2013 - 13:57 — tech

Решение задачи

Решение

  • ответить
вс, 12/08/2013 - 18:52 — Гость

сортировка массива

Дан двумерный массив х(4,6), найти минимальное значение каждой строки массива и записать их в одномерный массив А.

  • ответить
Пнд, 12/09/2013 - 10:36 — tech

Это поиск, а не сортировка

Это поиск, а не сортировка

  • ответить
сб, 02/09/2013 - 17:49 — Гость

Надо сделать функцию,

Надо сделать функцию, принимающую на вход массив произвольной длины и сортирует его выбором + прогамму для использования функции.

  • ответить
Втр, 01/29/2013 - 19:36 — Гость

Про примечание

n это константа, как вы его хотели изменять?

"поэтому требуется сохранить исходное значение n."

  • ответить