RosettaCodeData/Task/Reverse-a-string/Run-BASIC/reverse-a-string.basic

5 lines
100 B
Plaintext

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