Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.07.23;
Скачать: CL | DM;

Вниз

Какой алгоритм использовать   Найти похожие ветки 

 
Alien1769 ©   (2006-06-19 17:41) [0]

Ребята нужна помощь.
Есть строка
si:="123456789";
Как получить после кодировки
so:="bdfhjlnpr;

Я забыл этот алгоритм. Кто знает подскажите.


 
Lamer@fools.ua ©   (2006-06-19 17:44) [1]

function Crypt(const S: String): String;
begin
  if S <> "si:=""123456789"";" then
    raise Exception.Create("Unexpected argument value.");
  Result := "so:=""bdfhjlnpr;"
end;


 
Gero ©   (2006-06-19 17:45) [2]

xor


 
Alien1769 ©   (2006-06-19 17:52) [3]


> Gero ©   (19.06.06 17:45) [2]
> xor

Большое спасибо :)


 
Alien1769 ©   (2006-06-19 17:56) [4]


> so:="bdfhjlnpr


Уточняю: после функции кодировки коды символов - четные, это главное в задании.


 
palva ©   (2006-06-19 21:25) [5]

> коды символов - четные
Ну, после такой подсказки...


 
Alien1769 ©   (2006-06-19 21:36) [6]


> после такой подсказки

Какая Вам нужна?
Может следующая:
ord("1")=49
ord("b")=98
чтобы получить
so[1]:=ord("1")+49;
so[2]:=ord("2")+49; //дает 99 символ "c" , как получить четные коды ?


 
Alien1769 ©   (2006-06-19 21:41) [7]

to Gero
Большое спасибо !! Уже понятно.


 
SergP.   (2006-06-19 22:43) [8]

> [6] Alien1769 ©   (19.06.06 21:36)
>
> > после такой подсказки
>
> Какая Вам нужна?
> Может следующая:
> ord("1")=49
> ord("b")=98
> чтобы получить
> so[1]:=ord("1")+49;
> so[2]:=ord("2")+49; //дает 99 символ "c" , как получить
> четные коды ?


Может тогда for i:=1 to length(so) do so[i]:=chr(ord(so[i]) shl 1);
???

:-)



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

Текущий архив: 2006.07.23;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.056 c
5-1135776058
Змей
2005-12-28 16:20
2006.07.23
установка компоненты


15-1151066974
Сатир
2006-06-23 16:49
2006.07.23
Тенниска с вентилятором


15-1151396372
Dok
2006-06-27 12:19
2006.07.23
Кто как дебажит юникод?


3-1148038085
DVM
2006-05-19 15:28
2006.07.23
Одна база Access - несколько клиентов


15-1150889662
parovoZZ
2006-06-21 15:34
2006.07.23
Программно ограничить доступ к каталогу/файлу.