7 lines
78 B
ObjectPascal
7 lines
78 B
ObjectPascal
|
begin
|
||
|
|
var c := 'a';
|
||
|
|
var i := c.Code;
|
||
|
|
Println(i);
|
||
|
|
Println(Chr(i))
|
||
|
|
end.
|