Re[3]: Ширина кода - газетная vs книжная
От: rudzuk  
Дата: 12.01.25 19:05
Оценка: +1
Здравствуйте, swame, Вы писали:

s> S>Интересно, покажи свой читабельный код на 140 символов


Вот 128:
const

  //
  // https://www.rfc-editor.org/rfc/rfc6229
  //
  RFC6229Tests : array [0 .. 13] of record
                                      Name    : string;
                                      KeyHex  : string;
                                      Vectors : array [0 .. 17] of record
                                                                     Offset : Integer;
                                                                     Vector : array [0 .. 15] of Byte;
                                                                   end;
                                   end =
    (
      (
        Name    : 'Test Vectors 1';
        KeyHex  : '0102030405';
        Vectors : (
                    (Offset :    0; Vector : ($b2, $39, $63, $05, $f0, $3d, $c0, $27, $cc, $c3, $52, $4a, $0a, $11, $18, $a8)),
                    (Offset :   16; Vector : ($69, $82, $94, $4f, $18, $fc, $82, $d5, $89, $c4, $03, $a4, $7a, $0d, $09, $19)),
                    (Offset :  240; Vector : ($28, $cb, $11, $32, $c9, $6c, $e2, $86, $42, $1d, $ca, $ad, $b8, $b6, $9e, $ae)),
                    (Offset :  256; Vector : ($1c, $fc, $f6, $2b, $03, $ed, $db, $64, $1d, $77, $df, $cf, $7f, $8d, $8c, $93)),
                    (Offset :  496; Vector : ($42, $b7, $d0, $cd, $d9, $18, $a8, $a3, $3d, $d5, $17, $81, $c8, $1f, $40, $41)),
                    (Offset :  512; Vector : ($64, $59, $84, $44, $32, $a7, $da, $92, $3c, $fb, $3e, $b4, $98, $06, $61, $f6)),
                    (Offset :  752; Vector : ($ec, $10, $32, $7b, $de, $2b, $ee, $fd, $18, $f9, $27, $76, $80, $45, $7e, $22)),
                    (Offset :  768; Vector : ($eb, $62, $63, $8d, $4f, $0b, $a1, $fe, $9f, $ca, $20, $e0, $5b, $f8, $ff, $2b)),
                    (Offset : 1008; Vector : ($45, $12, $90, $48, $e6, $a0, $ed, $0b, $56, $b4, $90, $33, $8f, $07, $8d, $a5)),
                    (Offset : 1024; Vector : ($30, $ab, $bc, $c7, $c2, $0b, $01, $60, $9f, $23, $ee, $2d, $5f, $6b, $b7, $df)),
                    (Offset : 1520; Vector : ($32, $94, $f7, $44, $d8, $f9, $79, $05, $07, $e7, $0f, $62, $e5, $bb, $ce, $ea)),
                    (Offset : 1536; Vector : ($d8, $72, $9d, $b4, $18, $82, $25, $9b, $ee, $4f, $82, $53, $25, $f5, $a1, $30)),
                    (Offset : 2032; Vector : ($1e, $b1, $4a, $0c, $13, $b3, $bf, $47, $fa, $2a, $0b, $a9, $3a, $d4, $5b, $8b)),
                    (Offset : 2048; Vector : ($cc, $58, $2f, $8b, $a9, $f2, $65, $e2, $b1, $be, $91, $12, $e9, $75, $d2, $d7)),
                    (Offset : 3056; Vector : ($f2, $e3, $0f, $9b, $d1, $02, $ec, $bf, $75, $aa, $ad, $e9, $bc, $35, $c4, $3c)),
                    (Offset : 3072; Vector : ($ec, $0e, $11, $c4, $79, $dc, $32, $9d, $c8, $da, $79, $68, $fe, $96, $56, $81)),
                    (Offset : 4080; Vector : ($06, $83, $26, $a2, $11, $84, $16, $d2, $1f, $9d, $04, $b2, $cd, $1c, $a0, $50)),
                    (Offset : 4096; Vector : ($ff, $25, $b5, $89, $95, $99, $67, $07, $e5, $1f, $bd, $f0, $8b, $34, $d8, $75))
                  )
      )
avalon/3.0.2
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.