RosettaCodeData/Task/Singly-linked-list-Traversal/Run-BASIC/singly-linked-list-traversal.run
Ingy döt Net 68f8f3e56b all tasks
2013-04-11 01:07:29 -07:00

4 lines
102 B
Text

list$ = "now is the time for all good men"
for lnk = 1 to 8
print lnk;"->";word$(list$,lnk)
next lnk