Сортировка массива по убыванию - VB (59469)

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

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

Есть программа, в которой вы вводите количество и элементы массива и она выводит через MsgBox элементы массива по убыванию... Нужно написать похожую программу, но которая бы брала исходные данные с файла(txt) и результат тоже записывала бы в файл txt

Решение задачи: «Сортировка массива по убыванию»

textual
Листинг программы
For i = 1 To m
        Do
            q%=0
            For j = 1 To n - 1
                 If A(i, j) < A(i, j + 1) Then
                    tmp = A(i, j)
                    A(i, j) = A(i, j + 1)
                    A(i, j + 1) = tmp
                    q%=q%+1
                 End If
            Next j
            if q%=0 then Exit Do '!!!
         Loop
    Next i

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


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

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

9   голосов , оценка 4 из 5