home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / mbug / mbug039.arc / CHRSET.PAS < prev    next >
Pascal/Delphi Source File  |  1979-12-31  |  256b  |  13 lines
  1.  
  2. PROGRAM CHARACTERSET(OUTPUT);
  3. CONST
  4.         LOW = 32;
  5.         HIGH = 126;
  6. VAR
  7.         I : INTEGER;
  8. BEGIN
  9.         FOR I := LOW TO HIGH DO
  10.         WRITELN(I:4,CHR(I):4);
  11. END.
  12.  
  13. ) σσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσσ