Reverse words in a string: Difference between revisions
Content added Content deleted
m (→{{header|RPL}}: was missing) |
(Added Easylang) |
||
Line 1,132: | Line 1,132: | ||
end.</syntaxhighlight> |
end.</syntaxhighlight> |
||
The output is the same as the Pascal entry. |
The output is the same as the Pascal entry. |
||
=={{header|EasyLang}}== |
|||
<syntaxhighlight> |
|||
repeat |
|||
s$ = input |
|||
until error = 1 |
|||
s$[] = strsplit s$ " " |
|||
for i = len s$[] downto 1 |
|||
write s$[i] & " " |
|||
. |
|||
print "" |
|||
. |
|||
input_data |
|||
--------- Ice and Fire ------------ |
|||
fire, in end will world the say Some |
|||
ice. in say Some |
|||
desire of tasted I've what From |
|||
fire. favor who those with hold I |
|||
... elided paragraph last ... |
|||
Frost Robert ----------------------- |
|||
</syntaxhighlight> |
|||
=={{header|EchoLisp}}== |
=={{header|EchoLisp}}== |