13 lines
142 B
Text
13 lines
142 B
Text
|
program Concat;
|
||
|
|
|
||
|
|
{$APPTYPE CONSOLE}
|
||
|
|
|
||
|
|
var
|
||
|
|
s1, s2: string;
|
||
|
|
begin
|
||
|
|
s1 := 'Hello';
|
||
|
|
s2 := s1 + ' literal';
|
||
|
|
WriteLn(s1);
|
||
|
|
WriteLn(s2);
|
||
|
|
end.
|