RosettaCodeData/Task/String-prepend/XPL0/string-prepend.xpl0

7 lines
97 B
Plaintext

include xpllib;
char S, T(80);
[S:= "world!";
S:= StrCat(StrCopy(T,"Hello, "), S);
Text(0, S);
]