RosettaCodeData/Task/String-concatenation/Modula-3/string-concatenation-1.mod3

13 lines
199 B
Text
Raw Permalink Normal View History

2013-04-11 01:07:29 -07:00
MODULE Concat EXPORTS Main;
IMPORT IO;
VAR string: TEXT := "String";
string1: TEXT;
BEGIN
IO.Put(string & " literal.\n");
string1 := string & " literal.\n";
IO.Put(string1);
END Concat.