RosettaCodeData/Task/Reverse-a-string/TI-83-BASIC/reverse-a-string.ti-83

6 lines
73 B
Text
Raw Permalink Normal View History

2015-11-18 06:14:39 +00:00
:Str1
:For(I,1,length(Ans)-1
:sub(Ans,2I,1)+Ans
2013-04-10 23:57:08 -07:00
:End
2015-11-18 06:14:39 +00:00
:sub(Ans,1,I→Str1