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

6 lines
101 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
string$ = "12345"
numeric = val(string$)
numeric = numeric + 1
string$ = str$(numeric)
print string$