RosettaCodeData/Task/Arrays/Harbour/arrays-4.harbour
2016-12-05 23:44:36 +01:00

7 lines
297 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 ] )