Towers of Hanoi: Difference between revisions
Content added Content deleted
(→{{header|R}}: Added REBOL example.) |
(Added Oz example.) |
||
Line 617: | Line 617: | ||
hanoimove(4, 1, 2, 3);</lang> |
hanoimove(4, 1, 2, 3);</lang> |
||
=={{header|Oz}}== |
|||
<lang oz>declare |
|||
proc {TowersOfHanoi N From To Via} |
|||
if N > 0 then |
|||
{TowersOfHanoi N-1 From Via To} |
|||
{System.showInfo "Move from "#From#" to "#To} |
|||
{TowersOfHanoi N-1 Via To From} |
|||
end |
|||
end |
|||
in |
|||
{TowersOfHanoi 4 left middle right}</lang> |
|||
=={{header|Pascal}}== |
=={{header|Pascal}}== |