Damm algorithm: Difference between revisions

Content added Content deleted
m (→‎{{header|BASIC}}: GW-BASIC headered.)
Line 581: Line 581:


=={{header|BASIC}}==
=={{header|BASIC}}==
==={{header|GW-BASIC}}===
{{works with|BASICA}}
<syntaxhighlight lang="basic">10 DEFINT D,I,X,Y: DIM DT(9,9)
<syntaxhighlight lang="basic">10 DEFINT D,I,X,Y: DIM DT(9,9)
20 FOR Y=0 TO 9: FOR X=0 TO 9: READ DT(X,Y): NEXT X,Y
20 FOR Y=0 TO 9: FOR X=0 TO 9: READ DT(X,Y): NEXT X,Y