RosettaCodeData/Task/Increment-a-numerical-string/Run-BASIC/increment-a-numerical-string.basic
2023-07-01 13:44:08 -04:00

5 lines
101 B
Text

string$ = "12345"
numeric = val(string$)
numeric = numeric + 1
string$ = str$(numeric)
print string$