Home | History | Annotate | Download | only in BASIC
      1 5 DIM A(50,15)
      2 10 FOR I = 1 TO 50
      3 20 FOR J = 1 TO 15
      4 30   LET A(I,J) = I + J
      5 35 REM  PRINT I,J, A(I,J)
      6 40 NEXT J
      7 50 NEXT I
      8 100 FOR I = 1 TO 50
      9 110 FOR J = 1 TO 15
     10 120   PRINT A(I,J),
     11 130 NEXT J
     12 140 PRINT 
     13 150 NEXT I
     14 999 END
     15