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;
    var char_code: integer;
begin

    ch := 'a';
    
    char_code := ord(ch);
    
    writeln(char_code);
end.




(*
run:
  
97
  
*)

 

70+ SQL courses for beginners and professionals