Data update

Task/Arrays/VBScript/arrays.vb

@@ -1,45 +0,0 @@
-'Arrays - VBScript - 08/02/2021
-
-    'create a static array
-    Dim a(3)   ' 4 items : a(0), a(1), a(2), a(3)
-    'assign a value to elements
-    For i = 1 To 3
-        a(i) = i * i
-    Next
-    'and retrieve elements
-	buf=""
-    For i = 1 To 3
-        buf = buf & a(i) & " "
-    Next
-    WScript.Echo buf
-	
-    'create a dynamic array
-    Dim d()
-    ReDim d(3)   ' 4 items : d(0), d(1), d(2), d(3)
-    For i = 1 To 3
-        d(i) = i * i
-    Next
-	buf=""
-    For i = 1 To 3
-        buf = buf & d(i) & " "
-    Next
-	WScript.Echo buf
-	
-	d(0) = 0
-    'expand the array and preserve existing values
-    ReDim Preserve d(4)   ' 5 items : d(0), d(1), d(2), d(3), d(4)
-    d(4) = 16
-	buf=""
-    For i = LBound(d) To UBound(d)
-        buf = buf & d(i) & " "
-    Next
-	WScript.Echo buf
-
-	'create and initialize an array dynamicaly
-    b = Array(1, 4, 9)
-	'and retrieve all elements
-	WScript.Echo Join(b,",")
-
-	'Multi-Dimensional arrays
-	'The following creates a 5x4 matrix
-	Dim mat(4,3)