()нужно откомментировать каждую строчку программы unit моисортировки; //библиотека interface procedure s_sort(var x: array of integer); procedure b_sort(var x: array of integer); procedure i_sort(var x: array of integer); implementation procedure s_sort(var x: array of integer); begin for var i:
= 0 to x.length -2 do begin//номер минимума var k: =i; //начальная позиция минимума for var j: = i + 1 to x.length - 1 do if x[j] < x[k] then k : = j; swap(x[i], x[k])//меняем местами прошлое значение на следующее end; end; procedure b_sort(var x: array of integer); begin for var i: = 0 to
x.length - 2 do begin//порядковый номер минимума var f: =true; //вводим переменную f for var j: = 1 to x.length - 1-i do//начальное значение минимума if x[j] < x[j-1] then begin//условие к новому значению(если они меньше прошлого) f: = false; swap(x[j], x[j-1]) end; if f then break end; end;
procedure i_sort(var x: array of integer); begin for var i: =1 to x.length-1 do //начальное значение минимума begin var j: =i; //новое значение j var t: =x[i]; while (j< 0) and (t x[j]: =x[j-1]; j-=1; end; x[j]: =t end; end; end.
151
157
Ответы на вопрос:
смотри,repeat вводиться в том случии если не известно количество повторов или разов использования ,найди там где эо не известно и вставь.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Dirol343401.09.2021 00:28
-
RuslanaValiulina23.04.2020 10:00
-
Lika3921112.07.2022 18:49
-
natazhukova9504.02.2021 12:20
-
selemenevakrist04.12.2021 13:22
-
luba09226.03.2022 01:06
-
Малой9810.07.2020 23:19
-
lox5413.03.2021 11:46
-
innabat123.04.2022 16:49
-
Riyaa24.12.2022 23:08
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.