4 lines
60 B
ObjectPascal
4 lines
60 B
ObjectPascal
begin
|
|
var a: byte;
|
|
var c := a is integer(var s);
|
|
end. |