From 4007ea18f294aefb6128cbe82c5446cd8cb72c50 Mon Sep 17 00:00:00 2001 From: Louis Burda Date: Thu, 14 Mar 2024 21:30:16 +0100 Subject: Add solution --- chall/ply-2.2/example/BASIC/dim.bas | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 chall/ply-2.2/example/BASIC/dim.bas (limited to 'chall/ply-2.2/example/BASIC/dim.bas') diff --git a/chall/ply-2.2/example/BASIC/dim.bas b/chall/ply-2.2/example/BASIC/dim.bas new file mode 100644 index 0000000..87bd95b --- /dev/null +++ b/chall/ply-2.2/example/BASIC/dim.bas @@ -0,0 +1,14 @@ +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 -- cgit v1.2.3-71-gd317