Отсортировать элементы стоящие до последнего нечетного элемента массива по возрастанию методом выбора pascal abc
142
442
Ответы на вопрос:
Const n=10; var i,j,mn,mnin,k,ind: integer; a: array[1..n] of integer; begin writeln('исходный массив: '); randomize; for i: =1 to n do begin a[i]: =random(-n,n); write(a[i],' '); if ((a[i] mod 2)< > 0) and (a[i]< > 0) then ind: =i; end; writeln; // сортировка for i: =1 to ind-2 do begin mn: =a[i]; mnin: =i; for j: =i to ind-1 do if a[j]< mn then begin mn: =a[j]; mnin: =j; end; k: =a[i]; a[i]: =a[mnin]; a[mnin]: =k; end; writeln('новый массив: '); for i: =1 to n do write(a[i],' '); end.исходный массив: -10 -1 -5 3 -7 -10 1 1 -6 4 новый массив: -10 -10 -7 -5 -1 1 3 1 -6 4 исходный массив: -3 0 7 10 1 7 -3 5 -2 -2 новый массив: -3 -3 0 1 7 7 10 5 -2 -2
Var a,s1,s2,i: integer; begin s1: =0; s2: =0; write('введите результаты первого пятиборца: '); for i: = 1 to 5 do begin read(a); s1: =s1+a; end; write('введите результаты второго пятиборца: '); for i: = 1 to 5 do begin read(a); s2: =s2+a; end; writeln('s1 = ',s1); writeln('s2 = ',s2); end. пример: введите результаты первого пятиборца: 1 2 3 4 5 введите результаты второго пятиборца: 5 6 7 8 9 s1 = 15 s2 = 35
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
tryfest26.02.2020 09:43
-
Sapika19.02.2023 08:41
-
kuanich01.02.2023 12:37
-
АняПоторалова14.01.2020 15:32
-
mssarycheva23.07.2021 04:00
-
dima102802.12.2020 07:05
-
Alecsa2003313.07.2022 11:21
-
паша580898914.04.2020 09:58
-
Theboss00710.12.2020 15:34
-
Vafelka22521.06.2022 11:55
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.