h(n)=2*h(n-1)+1 h(1)=1 初始所有铜片都在a柱上 procedure hanoi(n,a,b,c:byte); {将第n块铜片从a柱通过b柱移到c柱上} begin if n=0 then exit; hanoi(n-1,a,c,b); {将上面的n-1块从a柱通过c柱移到b柱上} write(n,’moved from’,a,’to’,c); hanoi(n-1,b,a,c);{ 将b上的n-1块从b柱通过a柱移到c柱上 end;