Форум программистов, компьютерный форум, киберфорум
Наши страницы
Блоги
Войти
Регистрация
Восстановить пароль
Старый
Как прочитать множество из строки
Запись от Ales'hon'ne размещена 25.05.2013 в 11:20

Собственно, вопрос: есть строка, определяющая множество чисел как в паскале. Нужно эту строку разобрать. Готовых решений не нашёл (может, плохо искал), и пришлось писать велосипед.
Pascal
1
2
type
  ByteSet=set
...
Аватар для Ales'hon'ne
Размещено в Без категории
Просмотров 530 Комментарии 0 Ales'hon'ne вне форума
Старый
Преобразование RGB-HSL
Запись от Ales'hon'ne размещена 17.02.2013 в 15:32
Метки delphi/pascal, hsl, rgb, цвет

Функции для преобразования цветов из человекоудобной системы HSL в компьютероудобную RGB и обратно.
Суть системы HSL (для тех, кто не знает)
Нажмите на изображение для увеличения
Название: color-wheel.jpg
Просмотров: 1277
Размер:	144.0 Кб
ID:	1736
Итоговый цвет в HSL получается путём выбора основного тона (H, hue) и его
...
Аватар для Ales'hon'ne
Размещено в Без категории
Просмотров 1718 Комментарии 0 Ales'hon'ne вне форума
Старый
Класс-кэш
Запись от Ales'hon'ne размещена 21.08.2012 в 21:30
Обновил(-а) Ales'hon'ne 23.08.2012 в 10:10 (Ура! Кэш объектов заработал!)
Метки delphi/pascal

Назначение класса - временное хранение некоторого набора именованных значений, причём значение, к которому обращались недавно, будет возвращено быстрее, чем значение, к которому обращались давно.
...
Изображения
 
Вложения
Тип файла: zip CacheUnit.zip (1.4 Кб, 186 просмотров)
Аватар для Ales'hon'ne
Размещено в Без категории
Просмотров 3844 Комментарии 1 Ales'hon'ne вне форума
Старый
Реализация метода Рунге-Кутты
Запись от Ales'hon'ne размещена 20.08.2012 в 19:13
Обновил(-а) Ales'hon'ne 07.09.2012 в 15:05 (Изменён последний шаг (больше точности))

Пример использования:
Delphi
1
2
3
4
5
program CallExponent;
{программа вычисляет значение константы e путём
 решения дифференциального уравнения y'=y, y(0)=1}
uses
  RungeKutta;
...
Аватар для Ales'hon'ne
Размещено в Без категории
Просмотров 895 Комментарии 0 Ales'hon'ne вне форума
Старый
Рейтинг: 4.00. Голосов: 3.
Формула оценки сложности пароля
Запись от Ales'hon'ne размещена 25.07.2012 в 20:13
Обновил(-а) Ales'hon'ne 06.08.2012 в 15:24

Не очень сложная, но, при этом, вроде как что-то оценивает:
http://www.cyberforum.ru/cgi-bin/latex.cgi?(N+\sqrt{0.5N_s+N_r}-\sqrt{N_c})\log_N{N_u}
N - число символов в пароле
Nu - число уникальных символов (с учётом регистра)...
Аватар для Ales'hon'ne
Размещено в Без категории
Просмотров 2270 Комментарии 2 Ales'hon'ne вне форума
Старый
Функции вычисления кратных приставок
Запись от Ales'hon'ne размещена 22.06.2012 в 21:44
Обновил(-а) Ales'hon'ne 27.06.2012 в 10:29

Пример использования
Delphi
1
2
3
4
5
GetScPref(0.00017,0,'Ф');//=170 мкФ
GetScPref(1e20,0,'Дж');//=100 ЭДж
GetScPref(0.19856,2,'г');//=198,56 мг
GetScPref(0.19856,1,'г');//=198,6 мг
{-----------------}
...
Аватар для Ales'hon'ne
Размещено в Без категории
Просмотров 809 Комментарии 0 Ales'hon'ne вне форума
Старый
Бинарный поиск по монотонной функции или массиву
Запись от Ales'hon'ne размещена 21.06.2012 в 19:12
Обновил(-а) Ales'hon'ne 29.06.2012 в 15:30

Все сравнения осуществляются с точностью epsilon, если eps=0, то имеется реальный шанс искать значение вечно добиться переполнения стека.
Delphi
1
2
3
unit BynaryFind;
 
{Будьте внимательны при
...
Аватар для Ales'hon'ne
Размещено в Модули
Просмотров 1236 Комментарии 0 Ales'hon'ne вне форума
Старый
Модуль для хранения пароля
Запись от Ales'hon'ne размещена 12.02.2012 в 20:52
Обновил(-а) Ales'hon'ne 12.02.2012 в 21:04

Хранение пароля в виде самописного восьмибитного хэша (так что криптостойкость не особо велика), реализованы функции записи в файл, сравнения и изменения с запросом старого пароля.
Delphi
1
unit SubRosa;
...
Аватар для Ales'hon'ne
Размещено в Модули
Просмотров 731 Комментарии 0 Ales'hon'ne вне форума
Старый
Модуль рисования почтового индекса на канве
Запись от Ales'hon'ne размещена 12.02.2012 в 20:38
Обновил(-а) Ales'hon'ne 12.02.2012 в 21:03

Возможно, кому-нибудь пригодится. Правда, чтобы добиться совпадения рисунка с пунктиром на конверте придётся попотеть с коэффициентами.
Delphi
1
2
3
4
5
unit ZipCode;
 
interface
 
uses
...
Аватар для Ales'hon'ne
Размещено в Модули
Просмотров 795 Комментарии 0 Ales'hon'ne вне форума
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2019, vBulletin Solutions, Inc.
Рейтинг@Mail.ru