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