Найти значения минимального элемента одномерного целочисленного массива.
190
413
Ответы на вопрос:
// pascalabc.net 3.1, сборка 1218 от 12.04.2016 begin var a: =arrrandom(readinteger('n='),10,50); a.println; var m: =a.min; write('номера минимальных элементов (',m,'): '); a.select((x,i)-> rec(x,i+(x-> x.item1=m) .select(x-> x.item2).println(','); end. тестовое решение: n= 20 34 15 12 31 38 43 12 24 13 49 25 33 16 12 25 33 46 16 38 34 номера минимальных элементов (12): 3,7,14
//pascal abc.net v3.1 сборка 1172 const n=5; var ar: array[1..n] of integer; i,min: integer; sa: set of integer; begin min: =maxint; for i: =1 to n do begin readln(ar[i]); if ar[i]< =min then begin if ar[i]=min then sa: =sa+[i] else sa: =[i]; min: =ar[i]; end; end; writeln('min=',min); writeln('index: ',sa); end. пример ввода: 98777 пример вывода: min=7index: {5,4,3}
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
gdaniiiurik12309.08.2022 02:51
-
Сmetana3410.08.2020 17:40
-
Polina01102004004.09.2020 23:43
-
mskobetsnata03.03.2020 14:37
-
Гений161110.05.2020 06:14
-
Ева43306.07.2020 10:51
-
Zhaksyldi19.04.2023 00:42
-
Vitruviius06.08.2020 12:42
-
Hennesy32207.02.2022 23:43
-
лизя5ррр21.05.2022 17:36
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.