Matematické Fórum

Dobrý den,

mám problém s jedním příkladem v Pascalu, s Hanoiskými věžmi.

Zadání je takové, Na vstupu prectete cislo n urcujici pocet kotoucu. Vypiste posloupnost pokynu, jak prestehovat n kotoucu z prvni tyce na tyc druhou. Instrukce piste stylem "Kotouc cislo_kotouce z cislo_tyce na cislo_tyce", kde cislo_kotouce a poobakrat cislo_tyce jsou cisla. Kazdou instrukci piste na zvlastni radek. Tedy napriklad na vstup 2 vypisete tri radky a to: "Kotouc 1 z 1 na 3" "Kotouc 2 z 1 na 2" a "Kotouc 1 z 3 na 2" .

Potřebuji do svého programu nějak zakomponovat to číslo kotouče, které se přesouvá, což se mi zatím nedaří...

Mnohokrát děkuji"

Mám naprogramovaný následující kod:
program hanoj;
var n:integer;
procedure Hanoj(n: integer; pocatecni, cilova, odkladaci: char);
begin
    if n>1 then Hanoj(n-1, pocatecni, odkladaci, cilova);
    writeln('Přesuneme kotouč z věže ', pocatecni, ' na věž ', cilova);
    if n>1 then Hanoj(n-1, odkladaci, cilova, pocatecni)
end;
begin
readln(n)
Hanoj(n, 1,2,3)
end,

Tento program mi vypíše pomocí rekurze, jaké jsou tahy věžema. Ale já bych potřeboval přijít na to, jak do kodu zakomponovat to, jakou věž (jaké číslo věže) jsme kam v daném kroku přemístili?

Předem mnohokrát děkuji!