RosettaCodeData/Task/Character-codes/PascalABC.NET/character-codes.pas
2024-07-13 15:19:22 -07:00

6 lines
78 B
ObjectPascal

begin
var c := 'a';
var i := c.Code;
Println(i);
Println(Chr(i))
end.