Towers of Hanoi: Difference between revisions

Content added Content deleted
(Nimrod -> Nim)
Line 1,882: Line 1,882:


hanoimove(4, 1, 2, 3);</lang>
hanoimove(4, 1, 2, 3);</lang>

=={{header|Oforth}}==

<lang Oforth>func: move(n, from, to, via)
{
n 0 > ifTrue: [
move(n 1 -, from, via, to)
System.Out "Move disk from " << from << " to " << to << cr
move(n 1 -, via, to, from)
]
}

move(7, 1, 2, 3)</lang>


=={{header|Oz}}==
=={{header|Oz}}==