Die Türme von Hanoï

[ssach]

hy,

ich habe folgendes Problem :

ich muss eine Prozedur schreiben, der ich diese VAriablen als Eingbe gebe :

procedure Hanoi(N,G,H : integer, var LB : TListBox) N ist die Anzahl der Ringe
G ist der Stock aufdem sich die Ringe am Anfang befinden
H ist der Stock wo die Ringe sich am Ende befinden sollen
LB ist eine Listbox wo nach jedem schieben von einem Ring die Stöcke dringeschrieben werden (bsp: 1-2 : ein ring wird von stock 1 zu stock 3 befördert

Die prozedur muss sich nach jedem verschieben eines ringes also selbst aufrufen! (Rekursive prozedur)


also denke ich mao dass die Endkondition N=0 sein müsste?!

hoffe koennt mir helfen

danke

cu