Водномерном массиве найдите максимальное значение и индексы всех элементов равных ему(паскаль)
107
187
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1425 от 22.04.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(readinteger('n=',10); a.println; var amax: =a.max; writeln('максимальный элемент- ',amax); write('номера элементов, равных ',amax,': '); a.select((x,i)-> (x,(xi-> xi[0]=amax).select(xi-> xi[1]+1).println end. пример n= 50 1 3 -3 0 -9 0 -7 1 1 2 2 -5 2 -7 3 5 -6 10 7 3 1 -3 0 5 10 4 1 -6 -6 -4 -3 10 2 -3 4 -10 -1 9 -4 -9 8 -10 -3 6 4 -8 -9 -7 7 -6 максимальный элемент- 10 номера элементов, равных 10: 18 25 32
Const n = 13; var a: array[1..n] of integer; i,max: integer; begin randomize; write('исходный массив: '); max: =1; for i: = 1 to n do begin a[i]: =random(n div 2); write(' ',a[i]); if a[i] > a[max] then max: =i; end; writeln; writeln('максимальное значение: ',a[max]); write('номера максимальных элементов: '); for i: = 1 to n do if a[i] = a[max] then write(' ',i) end. пример работы программы: исходный массив: 4 5 3 0 0 4 0 4 2 3 3 5 2 максимальное значение: 5 номера максимальных элементов: 2 12
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
dimidom5624.11.2020 20:42
-
fedun2004200409.09.2020 19:09
-
одиночка703.04.2020 20:56
-
Siyara107.08.2020 17:45
-
Медет11111120.07.2022 05:11
-
ramzesrvc25.02.2023 18:32
-
дома928.03.2020 19:52
-
КлубВинксРоссия1731.05.2023 22:05
-
Битсухатян25.03.2021 08:29
-
eka0459929.04.2022 04:14
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.