Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/7: Рейтинг темы: голосов - 7, средняя оценка - 4.71
 Аватар для Lady Vik
0 / 0 / 0
Регистрация: 09.11.2009
Сообщений: 17

Сортировка массивов различными методами.

18.11.2009, 23:10. Показов 1458. Ответов 5
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Ребяточки, гении, помогите неопытной((
Сортировка массивов различными методами.
3. Сортировка простыми вставками.
Упорядочить целочисленный массив А[1..n] по не убыванию,
используя следующий метод: для i от 2 до n каждый элемент А[i] вставляется на свое место в упорядоченной ранее части массива А[1],…, A[i — 1]. При этом, естественно, если это необходимо, происходит сдвиг элементов массива.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
18.11.2009, 23:10
Ответы с готовыми решениями:

Сортировка массивов 4-мя методами и сравнение количества перестановок элементов
Добрый день. Делал следующие задание. "ввести пять массивов и каждый из массивов обработать четырьмя спосабами сортировок, после в виде...

Скорость сортировки различными методами
Написать программу на Pascal.Осуществить сортировку сгенерированных случайным образом чисел с помощью различных алгоритмов сортировки. ...

Отсортировать массив различными методами
Дан целочисленный вектор А. Программно реализовать алгоритм размещения элементов вектора А в порядке убывания на основе методов сортировки:...

5
1916 / 1066 / 384
Регистрация: 06.12.2008
Сообщений: 2,802
18.11.2009, 23:32
Сортировки поищите здесь


Цитата Сообщение от Lady Vik Посмотреть сообщение
по не убыванию
называется по возрастанию!
0
 Аватар для Lady Vik
0 / 0 / 0
Регистрация: 09.11.2009
Сообщений: 17
18.11.2009, 23:33  [ТС]
блин.. помоги плиииз
0
Программист 1С
 Аватар для Давид
859 / 647 / 187
Регистрация: 03.03.2009
Сообщений: 1,154
18.11.2009, 23:44
Lady Vik, Над данной задачей вы уже трудитесь не первый день!!!- хоть что то сами попытайтесь сделать, иначе понять будет сложно!!!Вот вам в помощь!
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
 {сортировка простыми вставками}
 procedure Insort(n:integer;var m:mas );
 var i,j,x,k:integer;label 1;
begin
k:=0;
 for i:=2 to n do
 begin
   x:=m[i];
   j:=i-1;
   while (x>m[j]) and (j>=1) do
   begin
     m[j+1]:=m[j];
     j:=j-1;
     k:=k+1;
     if j=0 then goto 1;
   end;
  1: m[j+1]:=x;
 end;
 writeln('SoPTuPoBka BCTABKAMU ' );
 for i:=1 to n do
 write(m[i]:3);
 writeln;
 writeln('Kol-vo iteracii ',k:4);
 writeln;
end;
2
 Аватар для Lady Vik
0 / 0 / 0
Регистрация: 09.11.2009
Сообщений: 17
19.11.2009, 00:01  [ТС]
а можно без процедур, а то мы ето не проходили еще, ну и на этом спасиба канешн
0
Программист 1С
 Аватар для Давид
859 / 647 / 187
Регистрация: 03.03.2009
Сообщений: 1,154
19.11.2009, 00:08
Lady Vik,
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
Uses crt;
var m:array[1..100] of integer;
    i,j,x,k,n:integer;
    label 1;
begin
clrscr;
write ('Kol-vo elementov = ');
readln (n);
for i:=1 to n do begin
                 write ('Vvedite ',i,' element ');
                 readln (m[i]);
                 end;
writeln (' Polecheny chisla ');
For i:=1 to n do write (m[i]:3);
writeln;
k:=0;
 for i:=2 to n do
 begin
   x:=m[i];
   j:=i-1;
   while (x<m[j]) and (j>=1) do
   begin
     m[j+1]:=m[j];
     j:=j-1;
     k:=k+1;
     if j=0 then goto 1;
   end;
  1: m[j+1]:=x;
 end;
 writeln(' SoPTuPoBka BCTABKAMU ' );
 for i:=1 to n do
 write(m[i]:3);
Readln
end.
Вот вам готовая ваша программа!
Будут вопросы - спрашивайте!
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
19.11.2009, 00:08
Помогаю со студенческими работами здесь

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

Сортировка массива двумя методами
Народ! Помогите кто чем может. Нужно написать программу, которая сортирует массив 2 способами, 1 это методом Шейкера 2 это метод...

вычисление определенных интегралов различными методами. паскаль
Составить алгоритм и написать программу вычисления определенного интеграла F(x)=∫_a^b▒f(x)dx на заданном отрезке интегрирования...

Вычислить интеграл exp(sin(x)) различными методами
По данной подынтегральной функции exp(sin(x)) подсчитать интеграл методом Симпсона, трапеций, правых, левых и серединных...

Вывод элементов массивов, сортировка массивов
вот ссылки program 1аЬ4; uses crt; const е=0.0010; d=l.Зе-7; var a, b, г, s, х, fa, fг, n, с : real; begin write('введите айв:...


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

Или воспользуйтесь поиском по форуму:
6
Ответ Создать тему
Новые блоги и статьи
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а привычная функция main(). . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru