RosettaCodeData/Task/Arrays/Quite-BASIC/arrays.basic

9 lines
148 B
Plaintext

10 ARRAY A
20 DIM B(10)
30 DIM C(3,2)
40 LET A[4711] = 17
50 LET B(3) = 5
60 LET B[7] = 3
70 LET C(3,2) = 1
80 PRINT C(3,2) + B(7) + B[3] + A(4711)