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

9 lines
144 B
Text

include "NSLog.incl"
CFStringRef s = @"12345"
NSInteger i
for i = 1 to 10
NSLog( @"%ld", fn StringIntegerValue( s ) + i )
next
HandleEvents