RosettaCodeData/Task/String-prepend/Pascal/string-prepend.pas
2023-07-01 13:44:08 -04:00

12 lines
195 B
ObjectPascal

program stringPrepend(output);
var
line: string(20);
begin
line := 'Hello ';
line := line + 'world!';
writeLn(line);
line := 'Hello ';
writeStr(line, line, 'world!');
writeLn(line)
end.