Anonymous user
Towers of Hanoi: Difference between revisions
no edit summary
(Added PicoLisp) |
No edit summary |
||
Line 29:
Hanoi(4);
end Towers;</lang>
=={{header|Agena}}==
<lang agena>move := proc(n::number, src::number, dst::number, via::number) is
if n > 0 then
move(n - 1, src, via, dst)
print(src & ' to ' & dst)
move(n - 1, via, dst, src)
fi
end
move(4, 1, 2, 3)</lang>
=={{header|ALGOL 68}}==
|