Дана последовательность из n различных чисел. найти сумму чисел этой последовательности, расположенных между максимальным и минимальным значениями ( в сумму включить оба этих числа) в visual basic.
142
152
Ответы на вопрос:
Const n=10; var a: array[1..n]of integer; min,max,i,s: integer; begin for i: =1 to n do read(a[i]); {вводим последовательность через пробел, последний элемент enter} min: =1; max: =1; {поиск индекса мин и макс} for i: =2 to n do begin if a[i]< a[min]then min: =i; if a[i]> a[max]then max: =i; end; {если индекс мин меньше чем индекс макс то} if max> min then for i: =min to max do s: =s+a[i] else {если индекс макс меньше чем индекс мин} for i: =max to min do s: =s+a[i]; writeln(' s= ',s); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Математика
-
смпанк200425.04.2020 23:28
-
alexfuerte0705.08.2021 17:48
-
vgfhdijubvn01.10.2022 05:43
-
vitiatiger05.06.2022 15:12
-
chuckcher08.05.2021 13:16
-
Mary2304Cat28.03.2022 12:46
-
enevismane02.04.2023 06:35
-
eerihovp08oqz30.09.2021 12:31
-
Апслтел16.07.2022 18:18
-
ЕваКимСокДжин28.11.2021 19:24
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.