RosettaCodeData/Task/Arrays/PureBasic/arrays-4.basic

5 lines
127 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
; Now, set up a multi dimensional Array
Dim MultiArray.i(800, 600)
MultiArray(100, 200) = 640
MultiArray(130, 40) = 120