Сортировать нечетные числа с прямого включения в одномерном массиве. pascal abc.net четные элементы должны остаться на своем месте.
221
486
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1467 от 02.06.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(readinteger('n=',50); a.println; var x: =a.where(x-> x.isodd).toarray; for var i: =1 to x.count-1 do begin var (j,l): =(i-1,x[i]); while (j> =0) do if x[j]> l then begin x[j+1]: =x[j]; j-=1 end else break; x[j+1]: =l end; var j: =0; for var i: =0 to x.length-1 do begin while a[j].iseven do j+=1; a[j]: =x[i]; j+=1 end; a.println; end. пример n= 15 49 10 3 44 -25 31 -18 -9 29 43 -24 -45 -19 45 -19 -45 10 -25 44 -19 -19 -18 -9 3 29 -24 31 43 45 49
А: =4 b: =2 b: =а/2*b //в результате b = 4/2*2 = 4 a: =2*a+3*b //в результате a = 2*4+ 3*4= 20 ответ: 20
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Adilet3737373719.10.2022 14:37
-
derment109.03.2021 04:12
-
vikabosch06.03.2020 16:40
-
artursharipoff06.06.2023 03:18
-
nazar608200508.08.2020 06:16
-
NastiaKostiuk15.06.2023 07:53
-
Transylvania101.07.2022 21:45
-
TITANIKбро10.09.2020 21:22
-
tatata133717.08.2021 22:17
-
fdgtrg4gewf23.08.2022 11:30
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.