RosettaCodeData/Task/Arrays/Clipper/arrays-4.clipper
Ingy döt Net 776bba907c Sync
2013-10-27 22:24:23 +00:00

7 lines
289 B
Text

// 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] )