Программа жизни. Рассказ из цикла Правда жизни

     Однажды Великий Программист написал очень простую программу, на которой строится... Хотя строится - слишком благородное понятие, точнее сказать - основывается, да. Так вот, написал программу, на которой основывается наша жизнь. Правда, с точки зрения нормального программиста, код программы - ересь, и автора нужно сжечь, но, тем не менее, она работала и работает. И все было бы хорошо, но однажды ее код просочился во всемирную паутину Интернета. Как же без этого. Я приведу его здесь , может быть, вы что-то в нем разберете...
 
 Program Lucky Life;
  Uses Crt;
  Var Man,n: Comp;
      Zhrat', Spat', Srat': Text;
  Begin
   Readln(n);
   For Man:=1 to n do
      If (Man:= Zhrat') and (Man:= Spat') and (Man:= Srat') then
      write(Don't take off rose-colored glasses. The world is beautiful!) else
      write(You can't change the world but you can change yourself!);
   end;
  End.