Сортировка элементов в двумерном массиве - VB

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

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

Помогите решить задачу. Дан двумерный массив А(3,3), пользователь заполняет его сам целыми числами. Отсортировать элементы этого массива так, чтоб сначала в массиве шли четные елементы, а за ними нечетные. Ну никак не могу придумать, что можно сделать. С одномерным массивом сделал эту задачу, с двумерным - никак.

Решение задачи: «Сортировка элементов в двумерном массиве»

textual
Листинг программы
Option Base 1
Private Sub Command1_Click()
 
Dim a(7), b(7) As Integer
 
n = 0
 
For i = 1 To 7
  a(i) = Val(InputBox("4islo"))
 
   If a(i) Mod 2 = 0 Then
    n = n + 1
    b(n) = a(i)
   End If
 
Next
 
For j = 1 To 7
 
If a(j) Mod 2 <> 0 Then
 n = n + 1
 b(n) = a(j)
End If
Next
 
For k = 1 To 7 
 Print b(k);
Next
 
End Sub

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


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

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

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