Отсортировать массив по возрастанию - 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.
Объяснение кода листинга программы
- В первой строке программы считывается количество элементов массива с помощью функции ReadLnInteger, которой передано имя переменной
n
и сообщение для пользователяn =
. Значение переменнойn
округляется вниз до целого числа. - Затем создается массив типа array of Integer с помощью функции SetLength, которой передано значение переменной
n
. - Далее в цикле for с помощью переменной
i
считываются значения элементов массива с помощью функции ReadLnInteger. В качестве аргументов функции передано имя переменнойa
, а также строка, которая формируется с помощью конкатенации строкa[
и значения переменнойi
, затем преобразуется в строку с помощью метода ToString. - После заполнения массива вызывается метод Sort класса System.Array, который сортирует массив по возрастанию.
- Наконец, с помощью функции WriteLn выводится отсортированный массив на экран.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д