Discussion @ 1219. Symbolic Sequence @ Timus Online Judge

Furtuna Dan Emanuel I got AC 0.093 48 Kb. No random [4] // Problem 1219. Symbolic Sequence 13 Apr 2005 01:22

var i:longint;

function car(k:longint):char;
begin
car:=chr(k+ord('a'));
end;

begin
for i:=0 to 333332 do
begin
write(car((i div 676) mod 26),car((i div 26) mod 26),car(i mod 26));
end;
write('a');
end.

famas Re: I got AC 0.093 48 Kb. No random // Problem 1219. Symbolic Sequence 23 Apr 2005 02:53

I got AC 0.078 25 Kb
var
    i:longint;
begin
    for i:=1 to 333333 do
    write(chr(97+((i div 676) mod 26)),chr(97+((i div 26) mod 26)),chr(97+(i mod 26)));
    write('a');
end.

chinalion Re: I got AC 0.093 48 Kb. No random // Problem 1219. Symbolic Sequence 23 Apr 2005 07:40

wyyyl Re: I got AC 0.093 48 Kb. No random // Problem 1219. Symbolic Sequence 10 Aug 2006 20:20

Thank you,it's really amazing!!!!!!!!!!

ძამაანთ [Tbilisi SU] Re: I got AC 0.093 48 Kb. No random // Problem 1219. Symbolic Sequence 11 Aug 2013 21:55

me too.

forn(26) fornj(26) fornk(26)
    {
        if (i == j && j==k) continue;
        if (M[i][j][k]) continue;

        M[i][j][k]=true;
        M[k][i][j]=true;
        M[j][k][i]=true;
        //and stuff here;
    }
}

Discussion of Problem 1219. Symbolic Sequence