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