RosettaCodeData/Task/String-prepend/PascalABC.NET/string-prepend.pas

##
var s := '12345678';
s := '0' + s;
Print(s);