home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The World of Computer Software
/
World_Of_Computer_Software-02-385-Vol-1of3.iso
/
f
/
faq-s.zip
/
ASCII.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1991-03-09
|
194b
|
14 lines
program ascii;
uses crt,dos;
var c:char;
i,code:integer;
begin
writeln ('Enter the character: ');
write (': '); readln (c);
writeln;
val (c,i,code);
writeln (code);
halt (0);
end.