Ответы на вопрос:
Const n=15; var i,k,mn,indm,sm: integer; a: array[1..n] of integer; sar: real; begin randomize; writeln('исходный массив: '); mn: =n; sm: =0; k: =1; for i: =1 to n do begin a[i]: =random(-n,n); sm: =sm+a[i]; write(a[i],' '); if a[i]=mn then k: =k+1; if a[i]< mn then begin mn: =a[i]; indm: =i; k: =1; end; end; writeln; writeln('минимальный элемент: ',mn,' индекс: ',indm); sm: =sm-a[indm]*k; writeln('сумма элементов без минимального: ',sm); sar: =sm/(n-k); writeln('среднее арифметическое: ',sar: 7: 3); end.исходный массив: -1 6 -12 -14 14 -14 10 -9 -2 -6 9 -1 -13 13 -2 минимальный элемент: -14 индекс: 4 сумма элементов без минимального: 6 среднее арифметическое: 0.462
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
SHERBINADARYA0028.09.2021 04:18
-
котейка5203.02.2021 23:41
-
ilya369444414.05.2020 04:02
-
valeriasavilova09.07.2021 11:57
-
MCKiri4PrO09.01.2023 21:38
-
Боня22725.09.2022 11:32
-
9978613.04.2022 13:14
-
kolisnyk9810.09.2022 01:06
-
giyosjjj14.12.2022 04:10
-
privetjakot30.09.2022 12:48
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.