RosettaCodeData/Task/Arrays/Clipper/arrays-4.clipper

8 lines
289 B
Text
Raw Permalink Normal View History

2013-10-27 22:24:23 +00:00
// Fill the 20 items of array with 0, starting from 5-th item:
AFill( arr4, 0, 5, 20 )
//Copy 10 items from arr4 to arr3[2], starting from the first position:
ACopy( arr4, arr3[2], 1, 10 )
//Duplicate the whole or nested array:
arr5 := AClone( arr1 )
arr6 := AClone( arr1[3] )