RosettaCodeData/Task/Multi-dimensional-array/Ada/multi-dimensional-array-11.adb

V1 : Vector := (1, 2, 3, 4, 5, 6, 7, 8, 9, 10);
V2 : Vector := (2, 2, 2, 2, 2, 2, 2, 2, 2, 2);
...
V2(3..6) := V1(7..10);