RosettaCodeData/Task/String-prepend/Free-Pascal-Lazarus/string-prepend.pas

var
	line: string[20];
begin
	line := 'Hello ';
	{$COperators on}
	line += 'world!';
	writeLn(line)
end.