12 lines
217 B
Text
12 lines
217 B
Text
|
Program StringConcat;
|
||
|
|
Var
|
||
|
|
s, s1 : String;
|
||
|
|
|
||
|
|
Begin
|
||
|
|
s := 'hello';
|
||
|
|
writeln(s + ' literal');
|
||
|
|
s1 := concat(s, ' literal');
|
||
|
|
{ s1 := s + ' literal'; works too, with FreePascal }
|
||
|
|
writeln(s1);
|
||
|
|
End.
|