Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
poseidon
0 / 0 / 0
Регистрация: 06.12.2010
Сообщений: 21
1

Сортировка одномерного массива.

26.02.2011, 16:33. Просмотров 918. Ответов 2
Метки нет (Все метки)

Прошу отсортировать массив методом нахождения минимального элемента, т.е. при каждом просмотре массива находим минимальный элемент и меняем местами его с первым на первом проходе, со вторым - на втором и т.д. Массив вводит пользователь.
Заранее спасибо)
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
26.02.2011, 16:33
Ответы с готовыми решениями:

Сортировка одномерного массива
Помогите отсортировать массив C. type Z=array of integer; Z1=array of real; Процедура...

Сортировка одномерного массива
Господа, помогите.... Завтра утром экзамен. Нужно сформировать одномерный массив из 100 элементов....

Сортировка одномерного массива
В одномерном массиве, состоящем из n вещественных элементов, вычислить: 1) номер минимального...

Сортировка одномерного массива
Помогите пожалуйста написать программу, которая должна: 1)выводить на экран меню с выбором метода...

Сортировка одномерного массива
uses crt; var a: array of integer; n,i,j:integer; begin clrscr; write('Vvedite...

2
Ev[G]eN
iOS/Android Developer
Эксперт С++
5117 / 1555 / 950
Регистрация: 23.01.2011
Сообщений: 3,185
Завершенные тесты: 1
26.02.2011, 17:13 2
Лучший ответ Сообщение было отмечено poseidon как решение

Решение

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
const
 n=10;
var
 arr: array[1..n] of integer;
 i, j, k, buf, min: integer;
begin
 min:=1;
  for i:=1 to n do
    read(arr[i]);
     for i:=1 to n-1 do
      begin
       min:=i;
        for j:=i+1 to n do
         begin
          if arr[j]<arr[min] then
           min:=j;
           buf:=arr[i];
           arr[i]:=arr[min];
           arr[min]:=buf;
            for k:=1 to n do
             write(arr[k], ' ');
             writeln;
         end;
      end; 
end.
1
Mad_Dog
Фрилансер
449 / 430 / 117
Регистрация: 01.06.2010
Сообщений: 1,315
26.02.2011, 17:17 3
Поторопился с постом..., сорри
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
26.02.2011, 17:17

Сортировка одномерного массива.
народ тема такая... написал прогу... но пойму как скрепить,так,чтобы когда пишеш список,он...

Сортировка одномерного массива
HELP ME PLEASE!!! :wall: Необходимо решить задачку: Дано: масив {X} размерностью n. ...

Сортировка одномерного массива
Дан одномерный массив &quot;Т&quot; состоящий из 5 цифр введенных с клавиатуры!Нужно составить процедуру для...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru