有意思。。

procedure TForm1.Button1Click(Sender: TObject);
var
  i:integer;
begin
  randomize;
  for i:=1 to 6 do
  memo1.Lines.Add(inttostr(random(33)));
end;

这是一段程序代码，谁能给破解一下：
                                             
?    -  Y         
               S                                                 Y  
            Y  

             Y  
           
Y               ?
Y  
            ?
Y               ?
Y               ?
Y                 ? c c o l u m n
 g r b i t  i c o l u m n  s z C o l u m n  s z O b j e c t $ s z R e f e r e n c e d C o l u m n $ s z R e f e r e n c e d O b j e c t  s z R e l a t i o n s h i p ?