Anonymous user
Phrase reversals: Difference between revisions
Added Seed7 example
(→{{header|Python}}: Added a variant composing three reusable abstractions) |
(Added Seed7 example) |
||
Line 1,938:
attesor edoc esarhp lasrever
reversal phrase code rosetta
</pre>
=={{header|Seed7}}==
<lang seed7>$ include "seed7_05.s7i";
const proc: main is func
local
var string: phrase is "rosetta code phrase reversal";
var string: word is "";
var array string: wordList is 0 times "";
begin
writeln("The original phrase:" rpad 27 <& phrase);
writeln("Reverse the entire phrase:" rpad 27 <& reverse(phrase));
for word range split(phrase, ' ') do
wordList &:= reverse(word);
end for;
writeln("Reverse words, same order:" rpad 27 <& join(wordList, ' '));
wordList := 0 times "";
for word range split(phrase, ' ') do
wordList := [] (word) & wordList;
end for;
writeln("Reverse order, same words:" rpad 27 <& join(wordList, ' '));
end func;</lang>
{{out}}
<pre>
The original phrase: rosetta code phrase reversal
Reverse the entire phrase: lasrever esarhp edoc attesor
Reverse words, same order: attesor edoc esarhp lasrever
Reverse order, same words: reversal phrase code rosetta
</pre>
| |||