Вывод "Hello Hello" с помощью esc-последовательностей

← →
Skyle © (2008-03-05 07:32) [0]

Пролетала тут как-то программка, выводящая вроде бы строку "Hello Hello" с помощью esc-последовательностей. В стиле "А я так напишу, что фиг кто разберёт". Что-то найти не могу. Ни у кого не сохранилось исходника?

← →
Skyle © (2008-03-05 08:39) [1]

Всё, получилось найти самостоятельно. Речь шла о

program Project1; {$APPTYPE CONSOLE} function _(__,___:string):string; begin _:=__+___; end; begin writeln(_(_(_(_(^(,^%),^,),^,),^/)+^`+_(^(,_(^%,_(^,,_(^,,^/))))); readln; end

← →
Skyle © (2008-03-05 08:41) [2]

Точнее искал не это, но это тоже подойдёт.

← →
Игорь Шевченко © (2008-03-05 12:15) [3]

Казалось бы, причем тут esc

а это что такое?
^% ??

> а это что такое?

http://ru.wikipedia.org/wiki/Escape-%D0%BF%D0%BE%D1%81%D0%BB%D0%B5%D0%B4%D0%BE%D0%B2%D0%B0%D1%82%D0%B5%D0%BB%D1%8C%D0%BD%D0%BE%D1%81%D1%82%D1%8C
"Escape-последовательность («исключённая последовательность») — совокупность идущих подряд значащих элементов, в группе теряющих для обрабатывающего механизма своё индивидуальное значение, одновременно с приобретением этой группой нового значения."

^% - это константа, и если в С/С++ оговорены термины escape characters и escape sequences для строковых констант, то в Delphi фигурирует исключительно термин control characters
^% = #101 = #$65 = "e" = [Ctrl+%]

если в контектсте Delphi трактовать ^... как Escape-последовательность - то также правомерно будет назвать Escape-последовательностью любой исходник...
вот например стопудовые(в такой трактовке) Escape-последовательности - {$R+}, #0, $20, {я Escape}, "стопудово ""Escape""", if i > 0 then dec(i);...

Хотя конечно все это вопросы терминологии...

Вывод "Hello Hello" с помощью esc-последовательностей Найти похожие ветки