Anonymous user
Phrase reversals: Difference between revisions
no edit summary
(→{{header|Yabasic}}: Output missing.) |
No edit summary |
||
Line 1,463:
attesoR edoC esarhP lasreveR
lasreveR esarhP edoC attesoR
</pre>
=={{header|MUMPS}}==
<lang MUMPS>set string="Rosetta Code Phrase Reversal"
set str="",len=$length(string," ")
for i=1:1:len set $piece(str," ",i)=$piece(string," ",len-i+1)
write string,!
write $reverse(string),!
write str,!
write $reverse(str),!</lang>
{{out}}<pre>Rosetta Code Phrase Reversal
lasreveR esarhP edoC attesoR
Reversal Phrase Code Rosetta
attesoR edoC esarhP lasreveR
</pre>
| |||