Главная страница
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.029 c
15-1136914646
Z*
2006-01-10 20:37
2006.01.29
Музыка на pc


15-1136651927
Pazitron_Brain
2006-01-07 19:38
2006.01.29
Можно ли создать ИИ?


15-1136470151
Desdechado
2006-01-05 17:09
2006.01.29
Что стало с ibase.ru ?


6-1129740158
SANEK_10289
2005-10-19 20:42
2006.01.29
Как передать данные на Веб-странчку?


2-1136655108
navinavi
2006-01-07 20:31
2006.01.29
как открыть определенную страницу файла *.hlp в delphi