Towers of Hanoi: Difference between revisions

Line 177:
 
 
#COMMENT Disk number is also printed in this code (works with a68g): #COMMENT
 
 
 
<lang algol68>
PROC move = (INT n, from, to, via) VOID:
IF n > 0 THEN
Line 187 ⟶ 186:
move(n - 1, via, to, from)
FI ;
main: (
move(4, 1,2,3)
)
</lang>
 
=={{header|ALGOL W}}==