М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Школянка
Школянка
06.07.2021 22:18 •  Информатика

Переставить элементы массива в порядке убывания и найти сумму элементов массива находящихся между наибольшим и наименьшим элементом массива не включая их самих pascal

👇
Ответ:
ilya20063
ilya20063
06.07.2021
PascalABC.NET 3.4.2, сборка 1880 от 18.11.2018Внимание! Если программа не работает, обновите версию!

begin

 var a := ArrRandom(ReadInteger('n='), -10, 10);

 a.Println;

 a := a.OrderDescending.ToArray;

 a.Println;

 var (max, min) := (a.Max, a.Min);

 var i1 := a.IndexesOf(t -> t = max).Last;

 var i2 := a.IndexOf(min);

 a?[i1 + 1:i2].Sum.Println

end.

Примерn= 15-10 9 9 -10 -5 -7 -9 1 -8 -10 1 7 10 4 -510 9 9 7 4 1 1 -5 -5 -7 -8 -9 -10 -10 -10-3
4,8(82 оценок)
Ответ:
xottabыs4
xottabыs4
06.07.2021
У, сначала нужно найти макс и мин элементы. 
Max = A(1) 
nMax = 1 
Min = A(1) 
nMin = 1 
For i = 2 to N 
if A(i) > Max Then 
Max = A(i) 
nMax = i 
End If 
if A(i) < Min Then 
Min = A(i) 
nMin = i 
End If 
Next i 
Таким образом мы узнали макс и мин элементы, а главное, их номера nMax и nMin. 
Проверим, какой номер больше, и сделаем так, чтобы было nMin < nMax. 
Если nMin > nMax, поменяем их местами 
If nMin > nMax Then 
Q = nMin 
nMin = nMax 
nMax = Q 
End If 
Теперь нужно отсортировать элементы между ними пузырьковой сортировкой по убыванию 
For i = nMin + 1 To nMax - 1 
Здесь вставляется алгоритм пузырьковой сортировки, который я не помню. Поищи в Интернете. 
Next i
4,4(86 оценок)
Открыть все ответы
Ответ:
ziatiok2016p074n4
ziatiok2016p074n4
06.07.2021

1-Текстовые процессоры, в отличие от текстовых редакторов, имеют больше возможностей для форматирования текста, внедрения в него графики, формул, таблиц и других объектов. Поэтому они могут быть использованы не только для набора текстов, но и для создания различного рода документов, в том числе официальных.

2-Notepad — входит в состав Microsoft Windows. Notepad GNU — свободный, текстовый редактор с открытым исходным кодом для Windows, разработанный для программистов и обычных пользователей. Он базируется на компоненте SynEdit и рас под лицензией GNU GPL. Notepad++ — основан на том же движке, что и SciTE.

3-Наиболее известными примерами текстовых процессоров являются Microsoft Word и OpenOffice.org Writer.

4-Возможность создавать новый документ, используя при этом шаблоны. ...

Возможность одновременно открывать и работать не с одним числом документов.

Автоматически проверять орфографию, стилистику и грамматику при вводе текста в документ.

5-Выберите Файл > Сохранить как.

-Выберите OneDrive, чтобы обеспечить удаленный доступ к документу.

-Введите название и нажмите кнопку Сохранить.

6-S-блок (или блок подстановок, англ. s-box от substitution-box) — функция в коде программы или аппаратная система, принимающая на входе n бит, преобразующая их по определённому алгоритму и возвращающая на выходе m бит.

7-абзац

8-выделить, нажать правую кнопку миши, выбрать "вырезать".

9-Совет: Если в документе есть только одна строка, которую нужно удалить, или Вы хотите удалить весь текст, то нажмите сочетание клавиш Ctrl+A, чтобы выделить всё. Затем нажмите Delete, и все строки удаляться.

10-Заливка

А отдел панели Абзац

11-С инструмента заливка во вкладке вставка

4,6(17 оценок)
Ответ:
sofia3451
sofia3451
06.07.2021

Объяснение:

Ну букву 'T' замените на int, к примеру:

C++Выделить код

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

void bubbleSort(int* arr, int size)  // Сортировка пузырьком

{

   int tmp;

 

   for(int i = 0; i < size - 1; ++i) // i - номер прохода

   {            

       for(int j = 0; j < size - 1; ++j) // внутренний цикл прохода

       {      

           if (arr[j + 1] < arr[j])  

           {

               tmp = arr[j + 1];  

               arr[j + 1] = arr[j];  

               arr[j] = tmp;

           }

       }

   }

}

Передавать массив вот так:

bubbleSort(имя_массива, количество_элементов);

0

4,4(32 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ