home *** CD-ROM | disk | FTP | other *** search
/ Shareware Overload / ShartewareOverload.cdr / progm / m2t-2.zip / WRITESM.MOD < prev   
Text File  |  1989-01-18  |  604b  |  33 lines
  1. MODULE WriteSm;
  2.  
  3. FROM InOut IMPORT WriteLn, WriteString;
  4.  
  5. BEGIN
  6.  
  7.    WriteString("This line will be displayed on the monitor.");
  8.    WriteLn;
  9.    WriteString('This line will be displayed too.');
  10.    WriteLn;
  11.    WriteString("This will all be ");
  12.    WriteString('on one line.');
  13.    WriteLn;
  14.    WriteString('She said, "I ');
  15.    WriteString("don't ");
  16.    WriteString('like dogs."');
  17.    WriteLn;
  18.  
  19. END WriteSm.
  20.  
  21.  
  22.  
  23.  
  24. (* Result of execution
  25.  
  26. This line will be displayed on the monitor.
  27. This line will be displayed too.
  28. This will all be on one line.
  29. She said, "I don't like dogs."
  30.  
  31. *)
  32.  
  33.