RosettaCodeData/Task/Arrays/PureBasic/arrays-4.basic
2023-07-01 13:44:08 -04:00

4 lines
127 B
Text

; Now, set up a multi dimensional Array
Dim MultiArray.i(800, 600)
MultiArray(100, 200) = 640
MultiArray(130, 40) = 120