1. Куча / Говнокод #12522

    +116

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    //DELPHI
Hex:string

Hex:='FFF123'

for i to length (Hex)
StrToInt('$' + InttoHex(Ord(Hex[i]),2))
 
//Какую только хрень не изобретут люди, не удосужившиеся найти в справке HexToBin...

    Действительно хорошая перекодировка.

    Запостил: Fruity418, 31 Января 2013

    Комментарии (2) RSS

    • ava Xom94ok 31.01.2013 18:24 # 0

      Тут даже не создается строка, содержащая все шестнадцатеричные цифры. Нет словаря char hex -> string bin. Ничего критично важного. Скучно.
      Hint: раздел Pascal неявно включает в себя Delphi, даже несмотря на то, что последний не заслужил такой чести.
      Ответить

    • ava ne4eHb 25.08.2021 08:11 # 0

      Они спустились на кухню, где мама Дани готовила ужин.
      Ответить

    Добавить комментарий