PersonalCorpus 版 (精华区)

277652 08:06:10 15 Nov 2002 Big Guava
1219 Pascal Accepted 0.12 sec 49K

program p1219;

var
    i:integer;
begin

{$IFNDEF ONLINE_JUDGE}
//    assign(input,'input1219.txt');reset(input);
    assign(output,'output1219.txt');rewrite(output);
{$ENDIF}

    randomize;
    for i:=1 to 1000000 do
        write(chr(97+random(26)));
end.