Помогите, мне необходимо отсортировать элементы, используя сортировку естественным слиянием. Алгоритм есть в Вирте, только вот один вопрос, что за loop такой стоит в цикле? И exit эти...подскажите как переделать. чтобы Delphi в консольном режиме понимал это? Что за цикл туда вставить? нет, ну конечно, если у кого-то есть пример программы в визуальной среде. так вообще буду рад на неё посмотреть)))
Скрин ниже иллюстрирует мою незадачу Изображения
Вирт имеет слабое отношение к Delphi, а вот к Оберону он имеет непосредственное отношение. Приведенный код судя по всему написано на Обероне. Могу предположить, что LOOP начинает бесконечный цикл, выход из которого осуществляется EXIT.
Аналог конструкции в Си
while (1)
{
if () break;
}
как в дельфи будет хз, уже забыл
[Ответ]
кстати кажется будет работать конструкция while 1=1 и потом тот же break. Спасибо, правда алгоритм не очень хорошо работает, буду искать ошибки)
[Ответ]
