RosettaCodeData/Task/Reverse-a-string/Run-BASIC/reverse-a-string.run
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

4 lines
100 B
Text

string$ = "123456789abcdefghijk"
for i = len(string$) to 1 step -1
print mid$(string$,i,1);
next i