{$APPTYPE CONSOLE}
const
  lst: set of char = ['T', 'r', 'o', 'l', '0', '1', 'O'];
var
  pthread: char;
begin
  for pthread in lst do
    Write(pthread);
  Writeln
end.