|
ru.algorithms
- RU.ALGORITHMS ----------------------------------------------------------------
From : Alexander Chislov 2:5020/400 07 Oct 2002 18:16:40
To : Mike Makhov
Subject : Re: Как закодировать?
--------------------------------------------------------------------------------
MM> Вот pешение "влоб":
MM> function BinaryStrToDecimal(BinStr: string):
MM> integer;
MM> var
MM> i: integer;
MM> function DecimalToBinaryStr( ANum: integer;
MM> StrLength: Byte ): string;
MM> var
MM> i: integer;
MM> str: string;
MM> Mike
MM> P.S. Можно и cоптимизиpовать, но, обычно эти
MM> функции нужны для отобpажения =>
MM> и так сойдет ;-(
прошу прощения, если я написал глупость насчёт того, что функции не
полностью приведены..
вполне возможно, что это в эхе какие-то глюки...
как бы там ни было, у меня отображается только вот что:
function BinaryStrToDecimal(BinStr: string): integer;
var
i: integer;
function DecimalToBinaryStr( ANum: integer;
StrLength: Byte ): string;
var
i: integer;
str: string;
если не трудно, скинь мне их полностью на емэил плиз
--
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5
* Origin: Talk.ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
