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

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

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

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

← →
[email protected] © (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]

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

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

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

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);
???

:-)

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