Задана последовательность N вещественных чисел. Отсортировать последовательность по убыванию методом выбор

@Greitor · Регистрация: 29.10.2016

Студворк — интернет-сервис помощи студентам

И снова прошу помощи написать код. Задана последовательность N вещественных чисел. Отсортировать
последовательность по убыванию методом выбора(см. Примечание). Примечание : методы сортировки (например по возрастанию)
------------
A) Выбором : отыскивается максимальный элемент и переносится в ко-
нец массива, затем этот метод применяется ко всем элементам
массива кроме последнего, т.к. Он уже на своем месте и т.д.
Не понимаю, как так сделать. Помогите плиз

@Puporev · 13.11.2016, 10:26

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
const nmax=100;
var a:array[1..nmax] of real;
    m,n,i,j,k,jmx:integer;
    x:real;
begin
randomize;
repeat
write('Размер массива от 2 до ',nmax,' m=');
readln(m);
until m in [2..nmax];
writeln('Исходный массив A:');
for i:=1 to m do
 begin
  a[i]:=9*random;
  write(a[i]:5:2);
 end;
writeln;
n:=0;{количетво отсортированных}
i:=1;{начало массива}
while i<m do {пока не конец - 1 }
 begin
  jmx:=1; {пусть это пока индекс максимума}
  for j:=1 to m-n do{с начала до уже выставленного на место максимума}
  if a[j]>a[jmx] then jmx:=j;{находим индекс самого макс.}
  x:=a[jmx];{запомним значение}
  for k:=jmx to m-n-1 do {сдвинем на него все неотсортированные элементы}
  a[k]:=a[k+1];
  a[m-n]:=x;{вставим очередной максимум на место}
  n:=n+1; {увеличим количетво отсортированных}
  i:=i+1; {идем вперед}
 end;
writeln('Отсортированный массив:');
for i:=1 to m do
write(a[i]:5:2);
writeln;
end.

@Greitor · 13.11.2016, 10:50 **[ТС]**

Сообщение от Puporev

a[i]:=9*random;

А почему 9*random?

@Puporev · 13.11.2016, 10:53

Ну захотел и сделал вещественные числа от 0 до 9. Удобно выводить в строку, сделайте другие если не нравится.

@Greitor · 13.11.2016, 18:29 **[ТС]**

Нравится, прост непонятно было

Добавлено через 6 часов 58 минут

Сообщение от Puporev

Так тут же получается вроде по возрастанию, не, где поменять на наоборот?

@Puporev · 13.11.2016, 18:42

Так фиг поймешь что нужно.
Сначала написано

Сообщение от Greitor

Отсортировать
последовательность по убыванию

А потом алгоритм для сортировки по возрастанию.

Сообщение от Greitor

отыскивается максимальный элемент и переносится в ко-
нец массива,

Добавлено через 1 минуту
По убыванию нужно точно так же, но искать минимальный, а не максимальный.

Новые блоги и статьи Все статьи Все блоги /
Звёздная пыль kumehtar 20.06.2025 Я просто это себе представляю: как создавался этот мир. Как энергия слипалась в маленькие частички. Как они собирались в первые звёзды, как во вселенной впервые появился Свет. Как эти звёзды. . .	Создание нейросети с PyTorch AI_Generated 19.06.2025 Ключевое преимущество PyTorch — его питоновская натура. В отличие от TensorFlow, который изначально был построен как статический вычислительный граф, PyTorch предлагает динамический подход. Это. . .	JWT аутентификация в ASP.NET Core UnmanagedCoder 18.06.2025 Разрабатывая веб-приложения, я постоянно сталкиваюсь с дилеммой: как обеспечить надежную аутентификацию пользователей без ущерба для производительности и масштабируемости? Классические подходы на. . .	Краткий курс по С# aaLeXAA 18.06.2025 Здесь вы найдете все необходимые функции чтоб написать програму на C# Задание 1: КЛАСС FORM 1 public partial class Form1 : Form { Spisok listin = new Spisok(); . . .	50 самых полезных примеров кода Python для частых задач py-thonny 17.06.2025 Эффективность работы разработчика часто измеряется не количеством написаных строк, а скоростью решения задач. Готовые сниппеты значительно ускоряют разработку, помогают избежать типичных ошибок и. . .
C# и продвинутые приемы работы с БД stackOverflow 17.06.2025 Каждый . NET разработчик рано или поздно сталкивается с ситуацией, когда привычные методы работы с базами данных превращаются в источник бессонных ночей. Я сам неоднократно попадал в такие ситуации,. . .	Angular: Вопросы и ответы на собеседовании Reangularity 15.06.2025 Готовишься к техническому интервью по Angular? Я собрал самые распространенные вопросы, с которыми сталкиваются разработчики на собеседованиях в этом году. От базовых концепций до продвинутых. . .	Архитектура Onion в ASP.NET Core MVC stackOverflow 15.06.2025 Что такое эта "луковая" архитектура? Термин предложил Джеффри Палермо (Jeffrey Palermo) в 2008 году, и с тех пор подход только набирал обороты. Суть проста - представьте себе лук с его. . .	Unity 4D GameUnited 13.06.2025 Четырехмерное пространство. . . Звучит как что-то из научной фантастики, правда? Однако для меня, как разработчика со стажем в игровой индустрии, четвертое измерение давно перестало быть абстракцией из. . .	SSE (Server-Sent Events) в ASP.NET Core и .NET 10 UnmanagedCoder 13.06.2025 Кажется, Microsoft снова подкинула нам интересную фичу в новой версии фреймворка. Работая с превью . NET 10, я наткнулся на нативную поддержку Server-Sent Events (SSE) в ASP. NET Core Minimal APIs. Эта. . .

@Greitor 0 / 0 / 0 Регистрация: 29.10.2016 Сообщений: 20

	Задана последовательность N вещественных чисел. Отсортировать последовательность по убыванию методом выбор 12.11.2016, 21:30. Показов 3936. Ответов 5 Метки нет (Все метки) И снова прошу помощи написать код. Задана последовательность N вещественных чисел. Отсортировать последовательность по убыванию методом выбора(см. Примечание). Примечание : методы сортировки (например по возрастанию) ------------ A) Выбором : отыскивается максимальный элемент и переносится в ко- нец массива, затем этот метод применяется ко всем элементам массива кроме последнего, т.к. Он уже на своем месте и т.д. Не понимаю, как так сделать. Помогите плиз 0

@Puporev Почетный модератор 64312 / 47609 / 32742 Регистрация: 18.05.2008 Сообщений: 115,181
	13.11.2016, 10:53
	Ну захотел и сделал вещественные числа от 0 до 9. Удобно выводить в строку, сделайте другие если не нравится. 0

Опции темы