mirror of
https://github.com/servo/servo
synced 2026-05-01 20:07:22 +02:00
15 lines
224 B
QBasic
15 lines
224 B
QBasic
5 DIM A(50,15)
|
|
10 FOR I = 1 TO 50
|
|
20 FOR J = 1 TO 15
|
|
30 LET A(I,J) = I + J
|
|
35 REM PRINT I,J, A(I,J)
|
|
40 NEXT J
|
|
50 NEXT I
|
|
100 FOR I = 1 TO 50
|
|
110 FOR J = 1 TO 15
|
|
120 PRINT A(I,J),
|
|
130 NEXT J
|
|
140 PRINT
|
|
150 NEXT I
|
|
999 END
|