Question

How to get character code (ASCII and Unicode) in Pascal

Answer 1

program Example;
var 
    ch: char;
begin
 
    ch := 'a';
     
    writeln(ord(ch));
end.
 
 
 
(*
run:
   
97
   
*)

 

70+ SQL courses for beginners and professionals

Answer 2

program Example;
var 
    ch: char;
    char_code: integer;
begin
 
    ch := 'a';
     
    char_code := ord(ch);
     
    writeln(char_code);
end.

 
 
(*
run:
   
97
   
*)
 

 

70+ SQL courses for beginners and professionals