Phrase reversals: Difference between revisions

Content added Content deleted
m (→‎{{header|Perl 6}}: Use put instead of say to collapse sequences.)
No edit summary
Line 1,366: Line 1,366:
2. attesor edoc esarhp lasrever
2. attesor edoc esarhp lasrever
3. reversal phrase code rosetta</pre>
3. reversal phrase code rosetta</pre>

=={{header|Maple}}==
<lang Maple>#reverse the string
str := "rosetta code phrase reversal":
print(StringTools:-Reverse(str)):
#reverse each word
lst := convert(StringTools:-Split(str, " "), Array):
for i to numelems(lst) do
lst[i] := StringTools:-Reverse(lst[i]):
end do:
print(StringTools:-Join(convert(lst,list)," ")):
#reverse word order
print(StringTools:-Join(ListTools:-Reverse(StringTools:-Split(str," ")), " ")):</lang>
{{Out|Output}}
<pre> "lasrever esarhp edoc attesor"
"attesor edoc esarhp lasrever"
"reversal phrase code rosetta"</pre>



=={{header|Mathematica}} / {{header|Wolfram Language}}==
=={{header|Mathematica}} / {{header|Wolfram Language}}==