Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.01.29;
Скачать: CL | DM;

Вниз

Сортировка   Найти похожие ветки 

 
Yegorchic ©   (2006-01-11 15:42) [0]

Здравствуйте! Объясните, пожалуйста, как действект такая сортировка:
var d:array[0..9] of longint;
a:byte;
n,i,j:longint;
begin
read(n);
fillchar(d,sizeof(d),0);
for i := 1 to n do
 begin
   read(a);
   d[a] := d[a] + 1
 end;
 for j := 0 to 9 do
 for i := 1 to d[j] do
 write(j:2);


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


 
Pazitron_Brain ©   (2006-01-11 16:05) [1]

Удалено модератором


 
Pazitron_Brain ©   (2006-01-11 16:06) [2]

Удалено модератором


 
Плохиш ©   (2006-01-11 16:09) [3]


> Yegorchic ©   (11.01.06 15:42)

Ни фига себе кто-то траву курит.


 
ferr ©   (2006-01-11 16:09) [4]

считает сколько 1 ты ввёл, сколько 2-ек и т.д. и потом зная их кол-во выводит их. Иногда называют сортировкой "подсчётом".


 
Плохиш ©   (2006-01-11 16:17) [5]

Приятней всего будет реакция на число большее 9 ;-)



Страницы: 1 вся ветка

Текущий архив: 2006.01.29;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.026 c
2-1136734569
Kostyan
2006-01-08 18:36
2006.01.29
Какая строка чаще всего встречается в Tstringlist?


1-1134906341
Kerk
2005-12-18 14:45
2006.01.29
одинаковые значения свойств


2-1136826110
Pazitron_Brain
2006-01-09 20:01
2006.01.29
Рандомизатор


2-1136992050
гвест
2006-01-11 18:07
2006.01.29
TWebBrowser


15-1136384875
AO
2006-01-04 17:27
2006.01.29
Сила воли и Терпение