Towers of Hanoi: Difference between revisions

Content added Content deleted
(Add ARM Assembly)
Line 614:
{{trans|D}}
 
<lang arturorebol>hanoi: @(function [n fromf todir via){][
if n>0 {[
hanoi n-1 fromf via todir
print ["Move disk " + n + " from " + from +f " to " + todir]
hanoi n-1 via todir fromf
}]
]
}
hanoi 3 "'L" "'M" "'R"</lang>
 
{{out}}
 
<pre>Move disk 1 from L to M
Move disk 2 from L to R
Move disk 1 from M to R
Move disk 3 from L to M
Move disk 1 from R to L
Move disk 2 from R to M
Move disk 1 from L to M</pre>