fork download
  1. program CarriageReturn(OUTPUT);
  2. begin
  3.  
  4. write(' ... Begin ... ');
  5.  
  6. write('12345', chr(13), '67890', chr(10), '09876', chr(13), '54321');
  7.  
  8. write(' ... End ...');
  9.  
  10.  
  11. { ----- }
  12. writeln(' :> ', chr(12));
  13.  
  14. writeln(' :> ', chr(11));
  15. { ----- }
  16.  
  17.  
  18. end.
  19.  
Success #stdin #stdout 0s 5324KB
stdin
Standard input is empty
stdout
 ... Begin ... 12345
67890
09876
54321 ... End ... :> 
 :>