var f:text;
    i:byte;
    c:byte;
begin
assign(f,'trans.txt');
rewrite(f);
  for i:=1 to 255 do Writeln(F,i,#9);
close(f);
end.
