program StringConcatenation;
var
dynamicsubstring1, dynamicsubstring2, result: string;
begin
// Define dynamic substrings
dynamicsubstring1 := 'double-quoted substring1';
dynamicsubstring2 := 'double-quoted substring2';
// Concatenate strings manually
result := 'This is a string with "' + dynamicsubstring1 + '", and "' + dynamicsubstring2 + '" inside.';
writeln(result);
end.
(*
run:
This is a string with "double-quoted substring1", and "double-quoted substring2" inside.
*)