Square but not cube: Difference between revisions

Content added Content deleted
(→‎{{header|Tcl}}: Add implementation.)
Line 720: Line 720:
260 PRINT</lang>
260 PRINT</lang>


{{works with|Commodore BASIC|7.0}}
{{works with|Commodore BASIC|3.5,7.0}}
This version uses BASIC 7's DO ... LOOP structure:
This version uses the later BASIC DO ... LOOP structure:
<pre>100 DIM SC(2): SC = 0: REM REMEMBER SQUARE CUBES
<pre>100 DIM SC(2): SC = 0: REM REMEMBER SQUARE CUBES
110 PRINT "SQUARES BUT NOT CUBES:"
110 PRINT "SQUARES BUT NOT CUBES:"