9 lines
100 B
Text
9 lines
100 B
Text
|
CHAR ARRAY S1,S2
|
||
|
|
|
||
|
|
Proc Main()
|
||
|
|
S1="Hello, "
|
||
|
|
S2="world!";
|
||
|
|
Sassign(S1,S2,S1(0)+1)
|
||
|
|
Print(S1)
|
||
|
|
Return
|