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

6 lines
101 B
Plaintext

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