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

11 lines
105 B
Plaintext

' [RC] Increment a numerical string.
o$ ="12345"
print o$
v =val( o$)
o$ =str$( v +1)
print o$
end