Admin: 1 revision imported

2021-02-07T06:56:29Z

1 revision imported

Admin at 16:08, 16 August 2019

2019-08-16T16:08:01Z

New page

Данный пример сравнивает скорость работы функции FindAndGoto для сортированной и не сортированной таблиц. Внутри цикла поиска также происходит увеличение массива с помощью функции AddLineSorted для проверки корректности ее работы.<br />

См. также [[Template:Пример поиска множества значений в сортированных таблицах|Пример поиска множества значений в сортированных таблицах]].
<pre>
ProfilerClear();
ProfilerStart();

randomize(1);
aTab:=Tab.Create("Col1,Col2,Col3");
For i:=1 To 100000 Do
aTab.AddLineSorted("Col1","Col1,Col2,Col3",Random(10000),Random(10000),Random(10000));
EndDo;

For i:=1 To 10000 Do
j:=Random(aTab.Size())+1;
aCol1:=aTab.Get(j,"Col1");
While _And(j>1,aTab.Get(j-1,"Col1")=aCol1) Do
j:=j-1;
EndDo;
aTab.FindAndGoto(aCol1,,"Col1",1);
If j<>aTab.CurLine Then
Message("Проблема при поиске значения!","!");
EndIf;
//Добавление случайного значения внутри цикла поиска
aTab.AddLineSorted("Col1","Col1,Col2,Col3",Random(10000),Random(10000),Random(10000));
EndDo;

randomize(1);
aTab:=Tab.Create("Col1,Col2,Col3");
For i:=1 To 100000 Do
aTab.AddLine("Col1,Col2,Col3",Random(10000),Random(10000),Random(10000));
EndDo;

aTab.Sort("Col1");
For i:=1 To 10000 Do
j:=Random(aTab.Size())+1;
aCol1:=aTab.Get(j,"Col1");
While _And(j>1,aTab.Get(j-1,"Col1")=aCol1) Do
j:=j-1;
EndDo;
aTab.FindAndGoto(aCol1,,"Col1");
If j<>aTab.CurLine Then
Message("Проблема при поиске значения (2)!","!");
EndIf;
//Добавление случайного значения внутри цикла поиска
aTab.AddLineSorted("Col1","Col1,Col2,Col3",Random(10000),Random(10000),Random(10000));
EndDo;

ProfilerStop();
debugbreak;

Message("Done!");
//Для i5, конечные результаты для среднего времени исполнения каждой операции:
//aTab.AddLineSorted() (нач. заполнение) -- 3.61 сек.
//aTab.AddLine() и aTab.Sort(); -- 3.45 сек.
//aTab.FindAndGoto(aCol1,,"Col1",1); -- 36 мс./10000
//aTab.FindAndGoto(aCol1,,"Col1"); -- 35010 мс./10000
//
//Как показывает эксперимент, для больших таблиц поиск в сортированной таблице имеет очень большое преимущество перед поиском без учета сортировки (1000 раз в нашем случае),
// преимущество будет только расти при увеличении количества строк в таблице
//Сортировка больших таблиц работает достаточно медленно, однако, использование функции AddLineSorted не имеет преимущества перед заполнением массива в случайном порядке, а затем его сортировкой.
// AddLineSorted, однако, незаменим в случаях, когда необходимо добавлять строки в таблицу в цикле, в котором одновременно происходит сортированный поиск в этой же таблице.
</pre>

← Older revision	Revision as of 06:56, 7 February 2021
(No difference)

Template:Пример поиска в сортированных таблицах - Revision history

Admin: 1 revision imported

Admin at 16:08, 16 August 2019