Towers of Hanoi: Difference between revisions
Content added Content deleted
(Added PicoLisp) |
No edit summary |
||
Line 29: | Line 29: | ||
Hanoi(4); |
Hanoi(4); |
||
end Towers;</lang> |
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}}== |
=={{header|ALGOL 68}}== |