Отсортировать массив по возрастанию - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

дан целочисленныймассив A(a1..an). отсортировать массив по возростанию начиная с минимального элемента

Решение задачи: «Отсортировать массив по возрастанию»

textual
Листинг программы
begin
  var n := ReadLnInteger('n =');
  var a : array of Integer;
  SetLength(a, n);
  for var i := 1 to n do
    a[i-1] := ReadLnInteger('a[' + i.ToString + '] =');
  System.Array.Sort(a);
  WriteLn(a);
end.

Объяснение кода листинга программы

  1. В первой строке программы считывается количество элементов массива с помощью функции ReadLnInteger, которой передано имя переменной n и сообщение для пользователя n =. Значение переменной n округляется вниз до целого числа.
  2. Затем создается массив типа array of Integer с помощью функции SetLength, которой передано значение переменной n.
  3. Далее в цикле for с помощью переменной i считываются значения элементов массива с помощью функции ReadLnInteger. В качестве аргументов функции передано имя переменной a, а также строка, которая формируется с помощью конкатенации строк a[ и значения переменной i, затем преобразуется в строку с помощью метода ToString.
  4. После заполнения массива вызывается метод Sort класса System.Array, который сортирует массив по возрастанию.
  5. Наконец, с помощью функции WriteLn выводится отсортированный массив на экран.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

13   голосов , оценка 3.769 из 5
Похожие ответы