Look-and-say sequence: Difference between revisions

Content added Content deleted
m (→‎Insitux: improvement)
Line 630: Line 630:


=={{header|BASIC}}==
=={{header|BASIC}}==
{{works with|QBasic}}
{{works with|QuickBasic}}
<syntaxhighlight lang="basic">10 DEFINT A-Z: I$="1"
<syntaxhighlight lang="basic">10 DEFINT A-Z: I$="1"
20 FOR Z=1 TO 15
20 FOR Z=1 TO 15