Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
akhaemi
1

Сортировка массива по возрастанию нечетных элементов

29.08.2010, 16:33. Просмотров 1162. Ответов 4
Метки нет (Все метки)

Помогите пожалуйста, мне нужно отсортировать одномерный массив так, чтобы сначала стояли упорядоченные по возрастанию нечетные элементы, а сразу после них без изменений остальные элементы, заранее спасибо!
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
29.08.2010, 16:33
Ответы с готовыми решениями:

Сортировка четных, а затем нечетных элементов массива по возрастанию
Помогите пожалуйста отсортировать массив. Сначала четные по возрастанию, а затем нечетные по...

Сортировка четных элементов массива по возрастанию, а нечетных-по убыванию
Задача в общем такая: Дан целочисленный массив.Отсортировать его четные элементы по возрастанию, а...

Сортировка четных столбцов матрицы по убыванию элементов, а нечетных - по возрастанию
Дана матрица, размерностью nxn, содержащая целые числа. Отсортировать каждый столбец матрицы с...

Cоставить второй массив, состоящий из нечетных элементов 1-го массива и отсортировать по возрастанию
Помогите ребят, побыстрее пожалуйста:( Задан массив, составить 2 массив, состоящий из нечетных...

4
Заблокирован
01.09.2010, 08:56 2
на форме два листбокса List1 и List2 и баттон Command1

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
Private Sub Command1_Click()
    Dim i As Long
    Dim j As Long
    Dim Tmp As Double
    Dim arr() As Double
    ReDim arr(List1.ListCount - 1)
    For i = 0 To List1.ListCount - 1
        arr(i) = CInt(List1.List(i))
    Next i
 
    For j = 0 To List1.ListCount - 2
        For i = 0 To List1.ListCount - 2
            If (((arr(i) Mod 2 = 0) And (arr(i + 1) Mod 2 <> 0)) Or ((arr(i) Mod 2 <> 0) And (arr(i + 1) Mod 2 <> 0) And (arr(i) > arr(i + 1)))) Then
                Tmp = arr(i)
                arr(i) = arr(i + 1)
                arr(i + 1) = Tmp
            End If
        Next i
    Next j
    For i = 0 To List1.ListCount - 1
        List2.AddItem (CStr(arr(i)))
    Next i
 
End Sub
 
Private Sub Form_Load()
    List1.AddItem (65)
    List1.AddItem (43)
    List1.AddItem (22)
    List1.AddItem (45)
    List1.AddItem (88)
    List1.AddItem (41)
    List1.AddItem (11)
    List1.AddItem (12)
    List1.AddItem (86)
    List1.AddItem (33)
    List1.AddItem (44)
End Sub
вроде работает
0
akhaemi
02.09.2010, 14:24 3
Огромное спасибо!
Заблокирован
03.09.2010, 10:47 4
для спасибо есть кнопка
0
0 / 0 / 0
Регистрация: 01.02.2012
Сообщений: 25
04.02.2012, 08:30 5
Помогите пожалуйста, мне нужно отсортировать 2-мерный массив.Перестановкой строк и столбцов добиться того, чтобы наибольший по значению элемент матрицы А(5,5) оказался в левом верхнем углу матрицы: элементы матрицы выбрать самостоятельно????
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
04.02.2012, 08:30

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Сортировка массива по возрастанию суммы делителей элементов этого массива
Задан массив, заполненный случайными целыми положительными числами. Произвести его сортировку в...

Сортировка по возрастанию элементов массива
Напишите пожалуйста программу, которая заполняет одномерный массив А(10) различными числами....

Сортировка элементов массива по возрастанию
Необходима сортировка эл-тов двумерного массива А по возрастанию по строкам Подскажите, как это...

Сортировка элементов массива по возрастанию.
Написал программу сортировки элементов массива целых чисел по возрастанию - программа работает, но...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.