■

蛇足ついでに、最初のLet's＼(・ω・)／にゃーまで解析。

(」・ω・)」うー(／・ω・)／にゃー(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!CHAOS☆CHAOS!(」・ω・)」うー!!(／・ω・)／にゃー!!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー!(／・ω・)／にゃー!(」・ω・)」うー(／・ω・)／にゃー(」・ω・)」うー!!!(／・ω・)／にゃー!!!I WANNA CHAOS!(」・ω・)」うー!!(／・ω・)／にゃー!!Let's＼(・ω・)／にゃー

　↓

>+++++++++[<++++++++>-]<.

function main;
var
    i, j : integer;
begin
    i := 0;
    j := 0;

    inc(j);
    inc(j);
    inc(j);
    inc(j);
    inc(j);
    inc(j);
    inc(j);
    inc(j);
    inc(j);
    
    for j := j downto 1 do
    begin
        inc(i);
        inc(i);
        inc(i);
        inc(i);
        inc(i);
        inc(i);
        inc(i);
        inc(i);
    end;
    
    writeln(chr(i));
end;

　↓

function main;
var
    i, j : integer;
begin
    i := 0;

    for j := 9 downto 1 do
    begin
        i := i + 8;        
    end;
    
    writeln(chr(i));
end;

うん、コンパイラは通してないけどこんなもんかな。

8*9=72で'H'のキャラコードが0x48=72だから合ってるハズ。多分。