Reverse a string: Difference between revisions

← Older editNewer edit →
Content deleted Content added
Added BBC BASIC
Line 143:
set %2=%chr%!%2!
goto loop</lang>
 
=={{header|BBC BASIC}}==
<lang bbcbasic> PRINT FNreverse("The five boxing wizards jump quickly")
END
DEF FNreverse(A$)
LOCAL B$, C%
FOR C% = LEN(A$) TO 1 STEP -1
B$ += MID$(A$,C%,1)
NEXT
= B$</lang>
 
=={{header|Befunge}}==
Retrieved from "https://rosettacode.org/wiki/Reverse_a_string"