Сообщение Re[5]: Что нового сейчас есть в Delphi? от 29.07.2024 22:07
Изменено 29.07.2024 22:09 swame
Re[5]: Что нового сейчас есть в Delphi?
Здравствуйте, Khimik, Вы писали:
K>Здравствуйте, swame, Вы писали:
S>>Больше я тестировать такое не хочу, надоело. если хочещь изготовь отдельный тестовый проект, чтобы я собрал и проверил,
S>>чтобы компилился без установки каких-то компонент.
S>>К тесту приложи цифры тестирования:
S>>1. Сравнение по скорости и занимаемой памяти с алгоритмом ChatGPT БЕЗ КОПИРОВАНИЯ на массивах 1 тыс, 1 млн, 1 млрд. записей.
K>Хорошо, специально для вас скомпилировал и проверил ещё раз весь код. Создайте новый проект с формой, киньте на форму две кнопки и скопируйте этот код. Скорее всего сможете прямо вставить код из под ката в ваш юнит, разве что за именем модуля надо следить:
Проверил, твой алгоритм показывает циферку времени чуть меньше чем GPT.
Но есть пара нюансов.
1. Твой алгоритм не сортирует.
Поставь после сортировки
for w := 0 to 999998 do
Assert (curarray.fitems[w]<=curarray.fitems[w+1],
w.ToString + ' ' + FloatToStr(curarray.fitems[w]) + ' ' + FloatToStr(curarray.fitems[w+1]));
2. Занимает раз в 8 больше памяти, еще непонятно сколько будет занимать когда будет правильно работать и какая будет скорость.
K>Здравствуйте, swame, Вы писали:
S>>Больше я тестировать такое не хочу, надоело. если хочещь изготовь отдельный тестовый проект, чтобы я собрал и проверил,
S>>чтобы компилился без установки каких-то компонент.
S>>К тесту приложи цифры тестирования:
S>>1. Сравнение по скорости и занимаемой памяти с алгоритмом ChatGPT БЕЗ КОПИРОВАНИЯ на массивах 1 тыс, 1 млн, 1 млрд. записей.
K>Хорошо, специально для вас скомпилировал и проверил ещё раз весь код. Создайте новый проект с формой, киньте на форму две кнопки и скопируйте этот код. Скорее всего сможете прямо вставить код из под ката в ваш юнит, разве что за именем модуля надо следить:
Проверил, твой алгоритм показывает циферку времени чуть меньше чем GPT.
Но есть пара нюансов.
1. Твой алгоритм не сортирует.
Поставь после сортировки
for w := 0 to 999998 do
Assert (curarray.fitems[w]<=curarray.fitems[w+1],
w.ToString + ' ' + FloatToStr(curarray.fitems[w]) + ' ' + FloatToStr(curarray.fitems[w+1]));
2. Занимает раз в 8 больше памяти, еще непонятно сколько будет занимать когда будет правильно работать и какая будет скорость.
Re[5]: Что нового сейчас есть в Delphi?
Здравствуйте, Khimik, Вы писали:
K>Здравствуйте, swame, Вы писали:
S>>Больше я тестировать такое не хочу, надоело. если хочещь изготовь отдельный тестовый проект, чтобы я собрал и проверил,
S>>чтобы компилился без установки каких-то компонент.
S>>К тесту приложи цифры тестирования:
S>>1. Сравнение по скорости и занимаемой памяти с алгоритмом ChatGPT БЕЗ КОПИРОВАНИЯ на массивах 1 тыс, 1 млн, 1 млрд. записей.
K>Хорошо, специально для вас скомпилировал и проверил ещё раз весь код. Создайте новый проект с формой, киньте на форму две кнопки и скопируйте этот код. Скорее всего сможете прямо вставить код из под ката в ваш юнит, разве что за именем модуля надо следить:
Проверил, твой алгоритм показывает циферку времени чуть меньше чем GPT.
Но есть пара нюансов, совсем незначительных.
1. Твой алгоритм не сортирует.
Поставь после сортировки
for w := 0 to 999998 do
Assert (curarray.fitems[w]<=curarray.fitems[w+1],
w.ToString + ' ' + FloatToStr(curarray.fitems[w]) + ' ' + FloatToStr(curarray.fitems[w+1]));
2. Занимает раз в 8 больше памяти, еще непонятно сколько будет занимать когда будет правильно работать и какая будет скорость.
K>Здравствуйте, swame, Вы писали:
S>>Больше я тестировать такое не хочу, надоело. если хочещь изготовь отдельный тестовый проект, чтобы я собрал и проверил,
S>>чтобы компилился без установки каких-то компонент.
S>>К тесту приложи цифры тестирования:
S>>1. Сравнение по скорости и занимаемой памяти с алгоритмом ChatGPT БЕЗ КОПИРОВАНИЯ на массивах 1 тыс, 1 млн, 1 млрд. записей.
K>Хорошо, специально для вас скомпилировал и проверил ещё раз весь код. Создайте новый проект с формой, киньте на форму две кнопки и скопируйте этот код. Скорее всего сможете прямо вставить код из под ката в ваш юнит, разве что за именем модуля надо следить:
Проверил, твой алгоритм показывает циферку времени чуть меньше чем GPT.
Но есть пара нюансов, совсем незначительных.
1. Твой алгоритм не сортирует.
Поставь после сортировки
for w := 0 to 999998 do
Assert (curarray.fitems[w]<=curarray.fitems[w+1],
w.ToString + ' ' + FloatToStr(curarray.fitems[w]) + ' ' + FloatToStr(curarray.fitems[w+1]));
2. Занимает раз в 8 больше памяти, еще непонятно сколько будет занимать когда будет правильно работать и какая будет скорость.