Вмассиве на 100 элементов (от -1000 до 1000) найти индексы самого большого и самого маленького элемента, а затем сумму чисел находящихся между ними. (паскаль)

270

377

Посмотреть ответы 3

Ответы на вопрос:

lubas143

Информатика

4,8(36 оценок)

// pascalabc.net 3.2, сборка 1399 от 08.03.2017 // внимание! если программа не работает, обновите версию! begin var a: =arrrandom(100,-1000,1000); a.println; var imax: =a.indexmax; var imin: =a.indexmin; writeln('индекс минимального ',imin+1,', максимального ',imax+1); if imin> imax then swap(imin,imax); writeln('сумма на участке: ',a[imin: imax+1].sum) end. пример -65 273 -273 58 108 919 -114 -119 -848 -24 301 -497 348 -386 -235 421 -907 -891 -151 675 -185 89 -991 -276 -802 914 959 -64 848 911 573 -941 59 -522 -460 890 963 840 85 -932 -974 -110 -698 785 537 867 778 -889 239 -659 -972 655 665 -136 555 847 263 -998 -141 194 961 950 34 -758 403 242 444 -130 -927 -124 459 -747 25 -220 649 925 -214 -775 188 -668 -865 847 698 506 882 919 -606 -806 -76 -306 -374 960 -19 891 -892 -923 857 -940 -619 -706 индекс минимального 58, максимального 37 сумма на участке: 1711

sverhrazum123

Информатика

4,4(71 оценок)

Begin var a: =arrrandom(100); a.println; if imax imax: =a[i]; k1: =i; if imin> a[i] then imin: =a[i]; k2: =i; writeln('индекс минимального ',imin+1,', максимального ',imax+1); if imin> imax then swap(imin,imax); writeln('сумма на участке: ',a[imin: imax+1].sum) end.

aida2801

Информатика

4,7(98 оценок)

Begin if n > 1 then decto5(n div 5); write(n mod 5); end; var n: integer; begin write('n = '); readln(n); if (n > 0) then decto5(n) else writeln('error, n must > 0! '); writeln; end .извини меня если не правильно. вроде так.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.