RosettaCodeData/Task/Increment-a-numerical-string/Run-BASIC/increment-a-numerical-string.run

6 lines
101 B
Text
Raw Permalink Normal View History

2013-04-10 22:43:41 -07:00
string$ = "12345"
numeric = val(string$)
numeric = numeric + 1
string$ = str$(numeric)
print string$