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

7 lines
108 B
Turing
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
$$ MODE TUSCRIPT
teststring="0'1'-1'12345'10000000'-10000000"
LOOP/CLEAR n=teststring
n=n+1
PRINT n
ENDLOOP