Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Вниз

Алгоритмы и типы   Найти похожие ветки 

 
Perseus   (2010-03-31 22:22) [0]

Здравствуйте, помогите пожалуста.
Есть переменная F типа
THashFunction = function (const S : string) : longint;
Допустим что F:=HashBKDR; где
function HashBKDR(const S : string) : longint;
{Note: this hash function is described in "The C Programming Language"
      by Brian Kernighan and Donald Ritchie, Prentice Hall}
var
 i : integer;
begin
 Result := 0;
 for i := 1 to length(S) do begin
   Result := (Result * 31) + ord(S[i]);
 end;
end;
Требуется сохранить F в текстовом файле, и загрузить ее же.
Заранее спасибо. Кстати может кто-нибудь знает хеш функцию, которая бы довала близкие (но не одинаковые) ключи для пожожих сторок, пропорционально проценту их совпадения (требуется для нечеткого сравнения).
(Заранее прошу прощения за тон изложения - я довольно таки начинающий программист пока:)


 
Jeer ©   (2010-03-31 22:36) [1]

Я тут, намедни, ходил по рынку - столько всяких вкусностей !
Купил, однако, по карману и по надобности.

Ферштейн ?


 
Юрий Зотов ©   (2010-03-31 23:07) [2]

> Perseus   (31.03.10 22:22)

Сохранить и загрузить любой текст - не проблема. В том числе, текст функции. Например, через TStringList.

Проблема в другом - ведь эту функцию еще и ВЫПОЛНИТЬ надо. А процессор не умеет выполнять текст, он умеет выполнять только машинные команды. Значит, текст функции придется сначала открмпилировать - и это должна будет сделать Ваша программа. Либо сама, либо запустив внешний компилятор.

Есть вариант попроще - Ваша программа должна содержать в себе интерпертатор. Либо свой, либо чей-то готовый. Свой писать сложно, это задача далеко не для начинающих. А готовый, думаю, можно найти в гугле по ключевым словам Pascal Script.


 
Jeer ©   (2010-03-31 23:12) [3]


> Юрий Зотов ©   (31.03.10 23:07) [2]


Мне просто интересно - кто более адекватен в ответе ?


 
Юрий Зотов ©   (2010-03-31 23:18) [4]


> Jeer ©   (31.03.10 23:12) [3]

Сергей, смысл твоего ответа я понял со второго прочтения. По-моему, очевидно, что человек, задающий ТАКОЙ вопрос, понять твой ответ просто не сможет - а потому истолкует, его, как выступление не по делу (в лучшем случае), или издевательство (в худшем). С соответствующей реакцией.

А не троллизм ли это? Взвесь объективно.


 
Медвежонок Пятачок ©   (2010-04-01 00:15) [5]

По-моему, очевидно, что человек, задающий ТАКОЙ вопрос, понять твой ответ просто не сможет

Но зато может догадаться, что нужно наконец научиться спрашивать.


 
Jeer ©   (2010-04-01 01:04) [6]


> А не троллизм ли это? Взвесь объективно.


Да я понимаю, что давно уже не от мира сего мои запросы и требования к окружающим.
Однако, почему я к ним должен быть менее требователен, чем к себе ?

Задумайся, Зотов.

P.S.
И приезжай летом в Калугу :)


 
Юрий Зотов ©   (2010-04-01 01:06) [7]

> Медвежонок Пятачок ©   (01.04.10 00:15) [5]

Для того, чтобы чему-то научиться, нужно это делать. Вот он и учится. Все нормально.

Вопрос составлен, конечно, коряво - ну а что Вы хотели? На то он и начинающий. Кстати, если немного подумать, то понять суть проблемы вполне можно. Мы же тут мастера, или только так называемся?


 
Юрий Зотов ©   (2010-04-01 01:09) [8]

> Jeer ©   (01.04.10 01:04) [6]

> почему я к ним должен быть менее требователен, чем к себе?

Потому что ты должен понимать, что разница между вами равна пропасти. То, что знаешь и понимаешь ты, человек пока еще не знает. И ты должен это учитывать. И делать соответствующую скидку.


 
Игорь Шевченко ©   (2010-04-01 01:22) [9]

Юрий Зотов ©   (01.04.10 01:09) [8]


> Потому что ты должен понимать


> И ты должен это учитывать


Еще раз - на этом сайте никто никому не должен.


 
Юрий Зотов ©   (2010-04-01 01:26) [10]


> Игорь Шевченко ©   (01.04.10 01:22) [9]


Кроме того, что каждый человек ДОЛЖЕН быть вежливым. И на сайте тоже.


 
Германн ©   (2010-04-01 01:36) [11]


> Еще раз - на этом сайте никто никому не должен.

Соблюдать правила должен каждый.
Уважать просьбы администрации, конечно, не обязательно, но имхо желательно. Автор того сабжа тоже, конечно, не прав задав свой глупый вопрос в "Основной", но насколько я знаю вопрос почти сразу был перенесен в "начинающим". А вот уже в ней следует избегать жестких высказываний тем, кто знает больше чем автор.
Хотя тёзку я весьма уважаю как специалиста. И насколько мне известно он "учит" не только на форумах. Но наверно не полностью понимает разницу.


 
Германн ©   (2010-04-01 01:37) [12]


> Юрий Зотов ©   (01.04.10 01:26) [10]
>
>
> > Игорь Шевченко ©   (01.04.10 01:22) [9]
>
>
> Кроме того, что каждый человек ДОЛЖЕН быть вежливым

Это не совсем то. Вежливость бывает разная. И невежливость тоже.


 
Демо ©   (2010-04-01 01:40) [13]


> Игорь Шевченко ©   (01.04.10 01:22) [9]
> Юрий Зотов ©   (01.04.10 01:09) [8] > Потому что ты должен
> понимать> И ты должен это учитыватьЕще раз - на этом сайте
> никто никому не должен.


Т.е. никто не должен вести себя цивилизованно?


 
Jeer ©   (2010-04-01 01:43) [14]


> Юрий Зотов ©   (01.04.10 01:26) [10]
> Кроме того, что каждый человек ДОЛЖЕН быть вежливым. И на
> сайте тоже.


Вежливым.. да, неплохо бы..


 
Игорь Шевченко ©   (2010-04-01 11:16) [15]

Демо ©   (01.04.10 01:40) [13]


> Т.е. никто не должен вести себя цивилизованно?


Мера цивилизованности у каждого своя


 
Плохиш ©   (2010-04-01 17:45) [16]

А я вообще понял вопрос, как желание сохранить уже откомпилированный код функции при выполнении программы, а при следующем выполнени считать его и выполнить...


 
Jeer ©   (2010-04-01 20:05) [17]


> Плохиш ©   (01.04.10 17:45) [16]
>
> А я вообще понял вопрос, как желание сохранить уже откомпилированный
> код функции при выполнении программы, а при следующем выполнени
> считать его и выполнить...


Ну ты и фантазер.


 
яяя   (2010-04-02 02:16) [18]

Удалено модератором


 
Германн ©   (2010-04-02 02:25) [19]

Удалено модератором


 
Gydvin ©   (2010-04-02 02:44) [20]

Удалено модератором



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2010.08.27;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.49 MB
Время: 0.07 c
2-1265554936
nordic3
2010-02-07 18:02
2010.08.27
вертикальная синхронизация в OpenGL


11-1216669322
Сашик
2008-07-21 23:42
2010.08.27
KOL: нужно ли освобождать память после VarArrayCreate...


2-1270481004
Fantasy
2010-04-05 19:23
2010.08.27
Shortcut на рабочем столе. Проблема с функцией GetDir(0,sPath);


2-1275197810
Радость
2010-05-30 09:36
2010.08.27
Инструмент нужен


2-1267322500
RWolf
2010-02-28 05:01
2010.08.27
TControlBar: как запретить вертикальное перемещение тулбаров





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский