
01.09.2008, 01:10
|
|
Участник форума
Регистрация: 30.08.2008
Сообщений: 128
Провел на форуме: 668329
Репутация:
106
|
|
Сообщение от 4y4o
Господа как сравнить десять введённый чисел? Только if? или можна по другому?
для чего сравнивать? в сортировке используется сравнение? Сортировки разные есть - по разному можно сравнивать 10 чисел - почти всегда только if используется, но иногда нет.
Например, вот алгоритм сортировки Шелла :
{на входе массив чисел a}
procedure sort;
var i,j,k,h,shag,t:integer;
begin
k:=0;
shag:=trunc( ln(n) / ln(2)-1); {vichislenie shaga metodom knuta}
for h:=shag downto 1 do
begin
k:=h;
for i:=k to n do
begin
t:=a[i];
j:=i-k;
while (j>0) and (t<a[j]) do
begin
a[j+k]:=a[j];
j:=j-k;
end;
a[j+k]:=t;
end;
end;
end;
Напиши, подробнее что нужно.
|
|
|