Сортировка по среднему баллу

@Solara · Регистрация: 19.03.2017

Студворк — интернет-сервис помощи студентам

Не получаетса доделать сортировку по среднем бале. Оно сортирует но не правельно. Вот что у меня получилось. Сортировка по среднем бале

C++
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
 void TForm1::SortGridColumn( int iCol )
{
        int iRows = StringGrid2->RowCount;
 
        // сортировка методом пузырька
        for( int i = iRows; i > 1; i-- )
        {
                for ( int j = 2; j < i; j++ )
                {
                        if ( StringGrid2->Cells[iCol][j] < StringGrid2->Cells[iCol][j-1] )
                        {
                                AnsiString sTemp = StringGrid2->Rows[j]->Text;
                                StringGrid2->Rows[j]->Text = StringGrid2->Rows[j-1]->Text;
                                StringGrid2->Rows[j-1]->Text = sTemp;
                        }
                }
        }
}
// сортировка по имене по 1 колонке
void __fastcall TForm1::SpeedButton7Click(TObject *Sender)
{
 
SortGridColumn(1);
 
}
//сортировка по среднем бале по 11 колонке
 
void __fastcall TForm1::SpeedButton8Click(TObject *Sender)
{
SortGridColumn(11);
}

@volvo · 22.05.2018, 21:42

Перепиши метод сортировки вот так:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
void TForm1::SortGridColumn(int iCol, bool Numbers) // не забудь поменять в классе формы
{
    int iRows = StringGrid2->RowCount;
 
    // сортировка методом пузырька
    for (int i = iRows; i > 1; i--)
    {
        for (int j = 2; j < i; j++)
        {
            if (Numbers ? StrToInt(StringGrid2->Cells[iCol][j]) < StrToInt(StringGrid2->Cells[iCol][j - 1]) :
                StringGrid2->Cells[iCol][j] < StringGrid2->Cells[iCol][j - 1])
            {
                AnsiString sTemp = StringGrid2->Rows[j]->Text;
                StringGrid2->Rows[j]->Text = StringGrid2->Rows[j - 1]->Text;
                StringGrid2->Rows[j - 1]->Text = sTemp;
            }
        }
    }
}

, и вызывай так:

C++
1
2
3
4
5
6
7
8
9
10
11
// сортировка по имене по 1 колонке
void __fastcall TForm1::SpeedButton7Click(TObject *Sender)
{
    SortGridColumn(1, false); // сортировать 1 столбец как текст
}
//сортировка по среднем бале по 11 колонке
 
void __fastcall TForm1::SpeedButton8Click(TObject *Sender)
{
    SortGridColumn(11, true); // 11-ый столбец сортировать как целые числа
}

@Solara · 22.05.2018, 21:56 **[ТС]**

неработает

@Solara · 22.05.2018, 21:57 **[ТС]**

volvo, volvo, неработает

@volvo · 22.05.2018, 22:18

У тебя не работает у меня - работает. Потому что у тебя не все элементы строки заполнены, а у меня - все. Что у тебя 6-я строка делает там вообще? В ней ничего нет, она пустая.

Добавлено через 2 минуты
В крайнем случае можно заменить 10 и 11 строки в моем коде на:

C++
10
11
            if (Numbers ? StrToIntDef(StringGrid2->Cells[iCol][j], 0) < StrToIntDef(StringGrid2->Cells[iCol][j - 1], 0) :
                StringGrid2->Cells[iCol][j] < StringGrid2->Cells[iCol][j - 1])

, но это - костыль. Строк с пустыми значениями быть не должно.

@Solara · 22.05.2018, 22:31 **[ТС]**

volvo, Спасибо, мой косяк.

Новые блоги и статьи Все статьи Все блоги /
Модель микоризы: классовый агентный подход 3 anaschu 06.01.2026 aa0a7f55b50dd51c5ec569d2d10c54f6/ O1rJuneU_ls https:/ / vkvideo. ru/ video-115721503_456239114	Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .	Модель микоризы: классовый агентный подход 2 anaschu 06.01.2026 репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .	Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .
Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .	Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .

@Solara 0 / 0 / 0 Регистрация: 19.03.2017 Сообщений: 39
	22.05.2018, 21:56 [ТС]
	неработает Миниатюры 0

@Solara 0 / 0 / 0 Регистрация: 19.03.2017 Сообщений: 39
	22.05.2018, 21:57 [ТС]
	volvo, volvo, неработает Миниатюры 0

@Solara 0 / 0 / 0 Регистрация: 19.03.2017 Сообщений: 39
	22.05.2018, 22:31 [ТС]
	volvo, Спасибо, мой косяк. 0

Сортировка по среднему баллу

Решение