RosettaCodeData/Task/Increment-a-numerical-string/TUSCRIPT/increment-a-numerical-string.tu

7 lines
108 B
Turing
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
$$ MODE TUSCRIPT
teststring="0'1'-1'12345'10000000'-10000000"
LOOP/CLEAR n=teststring
n=n+1
PRINT n
ENDLOOP