home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / FAQ-S.ZIP / ASCII.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1991-03-09  |  194 b   |  14 lines
  1. program ascii;
  2.  
  3. uses crt,dos;
  4.  
  5. var c:char;
  6. i,code:integer;
  7. begin
  8. writeln ('Enter the character: ');
  9. write (': '); readln (c);
  10. writeln;
  11. val (c,i,code);
  12. writeln (code);
  13. halt (0);
  14. end.