Sign in
gem5
/
testing
/
jenkins-gem5-prod
/
96ce18b82815b7996d2d9f39cf4ba567b153aba5
/
.
/
ext
/
ply
/
example
/
BASIC
/
dim.bas
blob: 87bd95b32ecae4cfce747f65f5ffd99e9e4cd19c [
file
] [
log
] [
blame
]
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
