void TForm1::sortBubble(Entry* arr) {           //Метод сортировки пузырьком (обменом) описан в лабораторной работе №7
    for (int i = ARRAY_SIZE - 1; i >= 1; i--)   //перебираем весь массив
        for (int j = 0; j < i; j++) {           //перебираем массив от начала до перебираемого числа в первом цикле
            if (arr[j].val > arr[j + 1].val) {  //Если число перебираемое больше, чем число правее
                Entry a = arr[j];               //Просто меняем местами
                arr[j] = arr[j + 1];
                arr[j + 1] = a;
            }
        }
}