Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.025 c