RosettaCodeData/Task/Array-concatenation/Icon/array-concatenation.icon
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

10 lines
168 B
Text

procedure main()
L1 := [1, 2, 3, 4]
L2 := [11, 12, 13, 14]
L3 := L1 ||| L2
sep := ""
every writes(sep, !L3) do
sep := ", "
write()
end