Сортировка одномерного массива по возрастанию - VB
Формулировка задачи:
помогите написать программку для
сортировки одномерного массива по возрастанию
Решение задачи: «Сортировка одномерного массива по возрастанию»
textual
Листинг программы
'Routines '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 'Процедура для сортировки массива методом пузырька ' 'Входные параметры: ' Arr - сортируемый массив. ' Нумерация элементов от 0 до N-1 ' N - размер массива ' 'Выходные параметры: ' Arr - массив, упорядоченный по возрастанию. ' Нумерация элементов от 0 до N-1 ' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' Public Sub BubbleSort(ByRef Arr() As Double, ByRef N As Long) Dim I As Long Dim J As Long Dim Tmp As Double For i=0# To N-1# Step 1 For j=0# To n-2#-i Step 1 If Arr(j)>Arr(j+1#) then Tmp = Arr(j) Arr(j) = Arr(j+1#) Arr(j+1#) = Tmp End If Next j Next i End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д