Задание 4 Параграф 22 ГДЗ Семакин 9 класс (Информатика)

Задача

Разработайте программу на Паскале. Имеется массив целых чисел (положительных и отрицательных). Необходимо отсортировать массив в порядке возрастания значений его элементов.

Подробный ответ

Для сортировки массива по возрастанию удобно использовать сортировку выбором. На каждом шаге находим в неотсортированной части массива наименьший элемент и меняем его местами с первым элементом этой части.

program sort;
const
  n = 10;
var
  a: array [1..n] of integer;
  i, j, c, k: integer;
begin
  writeln(‘ Формирование и вывод исходного массива’);
  randomize;
  for i := 1 to n do
  begin
    a[i] := random(100) — 50;
    write(a[i], ‘ ‘);
  end;
  writeln;
  for i := 1 to n — 1 do
  begin
    k := i;
    for j := i + 1 to n do
      if a[j] < a[k] then k := j;
    c := a[i];
    a[i] := a[k];
    a[k] := c;
  end;
  for i := 1 to n do
    write(a[i], ‘ ‘);
end.